# send output to file ###either open (LOGFILE, ">$logfile") || die "could not open log\n"; print LOGFILE `$tabfile`; if($?) { print STDERR "$tabfile failed: $?\n"; return; } close(LOGFILE); ##or `$tabfile > $logfile`; if($?) { print STDERR "$tabfile failed: $?\n"; return; } ## end or print "foo1\n"; exit (0);