in reply to Run Shell script followed by ctrl-c within perl

Try this 

perl -le'$SIG{INT}='ignore'; system "./loop.sh"; print "command return
+ed"; sleep 5; print "exiting"'

[download]

Loop.sh 

#!/bin/sh

while true
do
  time;
  sleep 1;
done

[download]
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.
RIP PCW It is as I've been saying!(Audio until 20090817)

In Section Seekers of Perl Wisdom