http://bugzilla.spamassassin.org/show_bug.cgi?id=4185

           Summary: ArchiveIterator.pm - Use of uninitialized value in
                    pattern match
           Product: Spamassassin
           Version: 3.0.2
          Platform: PC
        OS/Version: Linux
            Status: NEW
          Severity: normal
          Priority: P5
         Component: Libraries
        AssignedTo: [email protected]
        ReportedBy: [EMAIL PROTECTED]


While using spamassassin from Procmail, these messages are dislayed. The code
could be better prepared fro unexpected errors. See patch that follows.


Use of uninitialized value in pattern match (m//) at
/usr/share/perl5/Mail/SpamAssassin/ArchiveIterator.pm line 571.
Use of uninitialized value in pattern match (m//) at
/usr/share/perl5/Mail/SpamAssassin/ArchiveIterator.pm line 571.
Use of uninitialized value in string at
/usr/share/perl5/Mail/SpamAssassin/ArchiveIterator.pm line 578.
Use of uninitialized value in concatenation (.) or string at
/usr/share/perl5/Mail/SpamAssassin/ArchiveIterator.pm line 581.
Unable to open : No such file or directory
procmail: [21782] Fri Mar 11 10:32:57 2005
procmail: Error while writing to "/usr/bin/spamassassin"
procmail: Rescue of unfiltered data succeeded



2005-03-11  Jari Aalto  <jari aalto A T cante.net>

        * ArchiveIterator.pm (mail_open): Check NULL input $file
        argument before proceeding. Fixes error message:
        Use of uninitialized value in pattern match (m//)


--- ArchiveIterator.pm  2005/03/11 08:55:03     1.1
+++ ArchiveIterator.pm  2005/03/11 08:58:33     1.2
@@ -567,6 +567,11 @@
 sub mail_open {
   my ($file) = @_;
 
+  unless ( $file ) {
+      warn "ArchiveIterator.pm::mail_open() received NULL \$file argument\n";
+      return;
+  }
+
   my $expr;
   if ($file =~ /\.gz$/) {
     $expr = "gunzip -cd $file |";



------- You are receiving this mail because: -------
You are the assignee for the bug, or are watching the assignee.

Reply via email to