Perl Issues THANKS
Brendan Chard
chardlist at CHARD.NET
Fri Oct 8 14:18:51 IST 2004
That did the trick... Was this a perl issue? Is there something I should
keep in mind or notes on should I need to make changes to MS or SA in the
future?
-Brendan
-----Original Message-----
From: MailScanner mailing list [mailto:MAILSCANNER at JISCMAIL.AC.UK] On Behalf
Of Julian Field
Sent: Friday, October 08, 2004 8:05 AM
To: MAILSCANNER at JISCMAIL.AC.UK
Subject: Re: Perl Issues
At 13:01 08/10/2004, you wrote:
>Line 362 is:
>return 1 if ($name =~ /((?:[\[\]\\\/\<\>\|\?\*\:\"]|\p{IsCntrl}))/); ###
path
return 1 if ($name =~ /((?:[\[\]\\\/\<\>\|\?\*\:\"\x00-\x1f]))/); ### path
should do the trick.
>or special characters
>
>
>This is the whole chunk of the Filer.pm code surrounding line 362
>
>sub evil_filename {
> my ($self, $name) = @_;
>
> $self->debug("is this evil? '$name'");
>
> return 1 if (!defined($name) or ($name eq '')); ### empty
> return 1 if ($name =~ m{(^\s)|(\s+\Z)}); ### leading/trailing
whitespace
> return 1 if ($name =~ m{^\.+\Z}); ### dots
> return 1 if ($name =~ /((?:[\[\]\\\/\<\>\|\?\*\:\"]|\p{IsCntrl}))/);
> ### path or special characters
> return 1 if ($self->{MPF_MaxName} and
> (length($name) > $self->{MPF_MaxName}));
>
> $self->debug("it's ok");
> 0;
>}
>
>
>Is it possible that I missed grabbing some perl modules? I thought that
>the port installation took care of getting what it needed provided that
>perl was installed but it's been a while since my last install of MS.
>
>-Brendan
>
>-----Original Message-----
>From: MailScanner mailing list [mailto:MAILSCANNER at JISCMAIL.AC.UK] On
>Behalf Of Julian Field
>Sent: Friday, October 08, 2004 3:04 AM
>To: MAILSCANNER at JISCMAIL.AC.UK
>Subject: Re: Perl Issues
>
>It's a goodie this one.
>
>In /usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser/Filer.pm, at line 362,
>there is a statement given in the regular expression which your version of
>Perl does not support.
>If you post that line here, I will mail you the fixed version of it. I
>can't find an example of this at the moment.
>
>At 23:23 07/10/2004, you wrote:
> >I'm attempting a fresh install of mailscanner from FreeBSD Port to a
FreeBSD
> >4.7 machine.
> >
> >(Perl 5.6.1, SA 2.64, MS 4.33.3)
> >
> >I've done this install without issue on other similar FreeBSD machines
but
> >when I attempt to start mailscanner using the script in ../rc.d/ I get
the
> >following errors. Any help is greatly appreciated.
> >
> >Can't locate object method "SWASHNEW" via package "utf8" (perhaps you
forgot
> >to load "utf8"?) at
> >/usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser/Filer.pm line 362.
> >Compilation failed in require at
> >/usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser.pm line 152.
> >BEGIN failed--compilation aborted at
> >/usr/local/lib/perl5/site_perl/5.6.1/MIME/Parser.pm line 152.
> >Compilation failed in require at
> >/usr/local/lib/MailScanner/MailScanner/MCPMessage.pm line 40.
> >BEGIN failed--compilation aborted at
> >/usr/local/lib/MailScanner/MailScanner/MCPMessage.pm line 40.
> >Compilation failed in require at
/usr/local/libexec/MailScanner/MailScanner
> >line 51.
> >BEGIN failed--compilation aborted at
> >/usr/local/libexec/MailScanner/MailScanner line 51.
> >
> >-Brendan
--
Julian Field
www.MailScanner.info
MailScanner thanks transtec Computers for their support
Buy the MailScanner book at www.MailScanner.info/store
PGP footprint: EE81 D763 3DB0 0BFD E1DC 7222 11F6 5947 1415 B654
------------------------ MailScanner list ------------------------
To unsubscribe, email jiscmail at jiscmail.ac.uk with the words:
'leave mailscanner' in the body of the email.
Before posting, read the MAQ (http://www.mailscanner.biz/maq/) and
the archives (http://www.jiscmail.ac.uk/lists/mailscanner.html).
------------------------ MailScanner list ------------------------
To unsubscribe, email jiscmail at jiscmail.ac.uk with the words:
'leave mailscanner' in the body of the email.
Before posting, read the MAQ (http://www.mailscanner.biz/maq/) and
the archives (http://www.jiscmail.ac.uk/lists/mailscanner.html).
More information about the MailScanner
mailing list