Help for this page

Select Code to Download


  1. or download this
    open(LS, qq{/usr/local/openssh/bin/ssh -p 22 foo\@localhost "if [ -d /
+home/foo/bar/20110826 ] ; then echo 1 ; else echo 0 ; fi" |});
my $baz = <LS>;
  2. or download this
    local $SIG{CHLD} = sub {
    1 until waitpid(-1 , WNOHANG) == 1;
};