fork and exit;

my $old_code;