Current Path :
/
usr
/
share
/
doc
/
perl-IPC-Run-0.84
/
abuse
/
Or
Select Your Path :
Upload File :
New :
File
Dir
//usr/share/doc/perl-IPC-Run-0.84/abuse/timers
/usr/bin/perl -w use strict ; use IPC::Run qw( :all ) ; $IPC::Run::debug = 10 ; alarm 5 ; $SIG{ALRM} = sub { die "timeout never fired!" } ; my $out ; run [$^X, '-e', 'sleep 10'], ">", \$out, timeout 1 ;
