my $cmd1 = "perl prog1.pl";
system($cmd1);
my $cmd2 = "perl prog2.pl";
system($cmd2);
my $cmd3 = "perl prog3.pl";
system($cmd3);


##</code><code>##

BEGIN {
  open(STDERR, ">stderr2.log")
    or die "Failed to open log file";
}

##</code><code>##

close STDERR;