use strict;
use warnings;
print "main program\n";
my @args = ("/usr/bin/perl","prog2.pl", "Hallo");
system(@args) or die "system  failed: $?";