Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use warnings;
...
$chan->send_eof;

exit;
  2. or download this
    #!/usr/bin/perl
$|= 1;
...
print time, "\n";
sleep 1;
}