Help for this page
while (1) { while (<INPUT>) { .... } sleep $delay_period; seek(INPUT, 0, 1); }
#!/usr/bin/perl -w ... seek(INPUT, 0, 1); } print $query->end_html();
www.com | www.net | www.org
No recent polls found