Help for this page

Select Code to Download


  1. or download this
    perl -e 'use forks; print system("ping -c1 localhost"),"\n$?\n";print 
+$! if ($?==-1)'
  2. or download this
    perl -e 'print system("ping -c1 localhost"),"\n$?\n";print $! if ($?==
+-1)'
PING localhost.tan.us (127.0.0.1): 56 data bytes
...
0
0