Help for this page

Select Code to Download


  1. or download this
    $SIG{ALRM} = sub { #Your code here };
    
    ...
        # anytime during this 60 sec you can cancel the alarm with alarm(0
    +)
    };
    
  2. or download this
    #!/usr/local/bin/perl -w
    
    ...
     close ($sock);
    }