Help for this page
perl -MLWP::Simple -e "getprint 'http://www.perlmonks.org'"
perl -MIO::All -e 'io(":8080")->fork->accept->(sub { $_[0] < io(-x $1 +? "./$1 |" : $1) if /^GET \/(.*) / })'
www.com | www.net | www.org
Never Hardly ever Occasionally Fairly regularly Frequently
Results (17 votes). Check out past polls.
