##
#!/usr/local/bin/perl
for (1..10) {
system("some_long_running_shell_command");
}
some_other_stuff();
##
##
#!/usr/local/bin/perl
system("sleep 10");
sleep 10;
##
##
#!/usr/local/bin/perl
`sleep 10`;
sleep 10;
##
##
#ifndef PERL_MICRO
rsignal_save(SIGINT, (Sighandler_t) SIG_IGN, &ihand);
rsignal_save(SIGQUIT, (Sighandler_t) SIG_IGN, &qhand);
#endif