Help for this page

Select Code to Download


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