#!/usr/bin/perl $log = `cat log.txt | tail -n 200`; $log =~ s/\</g; $log =~ s/\>/>/g; print "Content-Type: text/html\n\n"; print "
"; print "$log"; print "