perl - checking if a text is encrypted or not..?

[Doctor_mizo]

Hello..
I want to make a simple script to check port 80 for requests
so if the http request is normal ascii or encrypted..?
is it possible to make it with Regex or something