Select Code to Download

    $cmd="myCommand";
    # Timeout evaluation:
...
    };
    alarm(0);

perl -le'$SIG{ALRM}=sub {die "TIMEOUT"};
     eval{alarm 10;
          open PIPE, "while [ 1 ] ;do echo \"foo\";sleep 5;done|";
          while (<PIPE>){print}};
     print $@'