Help for this page

Select Code to Download


  1. or download this
    my $pid = open(my $FROM_KID, "-|");
    die("Failed fork: $!") unless defined($pid);
    ...
        daemonize_self("", undef); # leave stdout alone
        exec "date" or die("Failed exec: $!");
    }
    
  2. or download this
    use Cwd ();
    use POSIX ();
    ...
        # change current working dir to root
        chdir(File::Spec->rootdir());
    }