Help for this page
perl -Mstrict -MLWP::Simple -we "$_=get('http://www.cnn.com');($a)=/Go +re\D*(2\d\d)<\/span>/m;($b)=/Bush\D*(2\d\d)<\/span/m;print+($a>270?'G +ore Wins':$b>270?'Bush Wins':'Undecided'),$/;"
perl -Mstrict -MLWP::Simple -we "{$_=get('http://www.cnn.com');($a)=/G +ore\D*(2\d\d)<\/spa/m;($b)=/Bush\D*(2\d\d)<\/spa/m;$@=($a>270?'Gore W +ins':$b>270?'Bush Wins':0);die `echo $@ | mail -s Results adam@perlmo +nks.org`,$@,$/ if $@; sleep 600; redo}"
www.com | www.net | www.org
No recent polls found