#!/usr/bin/perl print "Content-type:text/html\n\n"; print "
\n"; if ($ENV{'HTTP_USER_AGENT'} =~ /MSIE/) { print "You seem to be using Internet Explorer!
\n"; } elsif ($ENV{'HTTP_USER_AGENT'} =~ /Mozilla/) { print "You seem to be using Netscape!
\n"; } else { print "You seem to be using a browser other than Netscape or IE.
\n"; } print "\n";