--- pipe2sap.pl 2003/03/10 15:49:01 1.7 +++ pipe2sap.pl 2003/03/24 13:02:30 1.8 @@ -21,7 +21,7 @@ # open log and redirect die to it... open(LOG,">> $log") || warn "open log $log: $!"; -local $SIG{__DIE__} = sub { print scalar localtime LOG $_[0] ; die $_[0] }; +local $SIG{__DIE__} = sub { print LOG scalar localtime,$_[0] ; die $_[0] }; # directory in which files will be left my $outdir = $config->{outdir} || die "config: on defined";