#!/usr/bin/perl

#see manually.txt

use POSIX(setsid);
if(fork()) { wait; } else { setsid; exec {$ARGV[0]} @ARGV; }
