Help for this page

Select Code to Download


  1. or download this
    $ ./1.term.pl 
Sleeping 1 seconds ...
...
$ cat cleanup_handler_log.txt 
DESTROY() called. Cleaning up...
DESTROY() called. Cleaning up...
  2. or download this
    $ cat cleanup_handler_log.txt 
DESTROY() called. Cleaning up...
DESTROY() called. Cleaning up...
DESTROY() called. Cleaning up...
$
  3. or download this
    $ cat 1.term.pl 
#!/usr/bin/perl -w
...
sleep $sleep_time;
print "Print finishing normally (sleep $sleep_time completed)\n";
$