#!/usr/local/bin/perl chop ($current_date = `/bin/date`); $script_name = $ENV{'SCRIPT_NAME'}; print "Content-type: text/html", "\n\n"; print "", "\n"; print "Effects of Browser Caching", "\n"; print "
Полезная информация

", $current_date, "

", "\n"; print "

", qq|Click here to run again!|, "\n"; print "
", "\n"; exit (0);