Guest User

Untitled

a guest
Sep 24th, 2017
212
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 6 0.18 KB | None | 0 0
  1. sub walking-zombie(*@run-args) {
  2.   return unless fork() == 0;
  3.   my $proc = Proc::Async.new: @run-args;
  4.   $proc.stdout.tap.close;
  5.   $proc.stderr.tap.close;
  6.   $proc.start;
  7.   exit 0;
  8. }
Advertisement
Add Comment
Please, Sign In to add comment