Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use IPC::Run qw(start pump finish timeout);
...
}

finish($TOK) or die "returned: $?";
  2. or download this
    out:1. line
;;ENDSAGE=1. line
out:2. line
;;ENDSAGE=2. line
  3. or download this
    out:1. line
;;MESSAGE=1. line;;END
out:2. line
;;MESAGE=2. line;;END