#!/usr/bin/perl print "Content-type:text/html\r\n\r\n"; print ""; print ""; print "SNiff"; print ""; print ""; print "

Hello: $ENV{'HTTP_USER_AGENT'}

"; print ""; print "";