#!/usr/bin/perl -w

my $x = $ARGV[0] + 1;
print STDERR "$x\n";
`./my_program $x`;

##</code><code>##

(ulimit -u100; ./my_program)
(ulimit -u50; ./my_program)
(ulimit -u20; ./my_program)