--- lib/Mail/SpamAssassin/Dns.pm.orig 2004-09-22 00:51:34.000000000 +0400 +++ lib/Mail/SpamAssassin/Dns.pm 2004-10-03 14:30:22.000000000 +0400 @@ -793,10 +793,10 @@ sub dcc_lookup { dbg("DCC command: ".join(' ', $path, "-H", $opts, "< '$tmpf'", "2>&1"),'dcc',-1); - # my $pid = open(DCC, join(' ', $path, "-H", $opts, "< '$tmpf'", "2>&1", '|')) || die "$!\n"; - my $pid = Mail::SpamAssassin::Util::helper_app_pipe_open(*DCC, - $tmpf, 1, $path, "-H", split(' ', $opts)); - $pid or die "$!\n"; + my $pid = open(DCC, join(' ', $path, "-H", $opts, "< '$tmpf'", "2>&1", '|')) || die "$!\n"; + #my $pid = Mail::SpamAssassin::Util::helper_app_pipe_open(*DCC, + # $tmpf, 1, $path, "-H", split(' ', $opts)); + #$pid or die "$!\n"; my @null = ; close DCC;