[Mimedefang] File::Spec::Unix errors

[Jason Englander]

Sorry to not reply to the original, I deleted it by mistake...

Someone mentioned errors similar to this (I use perl 5.8.0 though, so the
line number will probably be different):

Oct 17 18:16:01 mrhanky mimedefang-multiplexor: Slave 2 stderr: Use of
uninitialized value in pattern match (m//) at
/usr/lib/perl5/5.8.0/File/Spec/Unix.pm line 217. Use of uninitialized
value in pattern match (m//) at /usr/lib/perl5/5.8.0/File/Spec/Unix.pm
line 217.

It's a complaint from the File::Spec::Unix perl module which is used by
SpamAssassin (I use 2.43).  Could be something else too though, haven't
checked anything else.  I don't think MIMEDefang uses it.

Anyway, to shut up the errors, open up File::Spec::Unix (which is
/usr/lib/perl5/5.8.0/File/Spec/Unix.pm on my system), go to the line
number mentioned in the error above (not my error, your error) and change
this:

sub path {
    my @path = split(':', $ENV{PATH});

to this:

sub path {
    my @path = split(':', $ENV{PATH}) if defined($ENV{PATH});

The module doesn't take into account that there might not be any PATH.

-- 
Jason Englander <jason at englanders.cc>
394F 7E02 C105 7268 777A  3F5A 0AC0 C618 0675 80CA