#!/usr/bin/perl -w
print STDERR "$$\n";
`./my_program`;