{
    local $SIG{CHLD} = "IGNORE";
    if (my $pid = fork) {
    }
    else {
        print "child ($$)";
        # mach was aufwaendiges
        close STDOUT;
        close STDERR;
        close STDIN;sleep 3;
        CORE::exit;
    }
}
sleep 420;