Help for this page
$timeout=1000; open (FP, "scriptC.pl |") or die 'Error'; ... $timeout -=30; print 'Waiting for execution to finish'. $timeout; }