##
if ($pid) {
# Parent
print STDERR "\e[101m(1a) Parent about to return\e[m\n";
return $fh;
}
####
my $unused_fh = monitor_build("./fakebuild");
####
my $psyscmd = system_command("$bld_cmd 2>&1");
# ...
if ($pid) {
# Parent
print STDERR "\e[101m(1a) Parent about to return\e[m\n";
return $psyscmd;
}