use Text::BibTeX;
use User;
use Data::Printer;
+use POSIX;
use DBI;
die "Unable to fork for some reason: $!";
}
if ($child == 0) {
+ foreach (0 .. (POSIX::sysconf (&POSIX::_SC_OPEN_MAX) || 1024))
+ { POSIX::close $_ }
+ open (STDIN, "</dev/null");
+ open (STDOUT, ">/dev/null");
+ open (STDERR, ">&STDOUT");
exec(@cmd);
} else {
return $child;