Interesting Error - Can't use string ("1909") as an ARRAY ref while "strict refs" in use

[Julian Field]

On 3/8/09 3:25 PM, Drew Marshall wrote:
> ----- "Julian Field"<MailScanner at ecs.soton.ac.uk>  wrote:
>
>    
>> Okay, try changing your line 509 to say this instead:
>> while(${@{$body}}[$#{@$body}] !~ /^\s*$/) {
>> That does at least compile ( sorry about that :-(
>>      
> No worries. You are right it does compile but..
>
> MailScanner --debug
> In Debugging mode, not forking...
> Trying to setlogsock(unix)
> Building a message batch to scan...
> Have a batch of 5 messages.
> max message size is '250000 trackback'
> Can't use string ("76") as an ARRAY ref while "strict refs" in use at /usr/share/MailScanner//MailScanner/PFDiskStore.pm line 509.
>    
How about this then? (He says, desperately trying to work around a nast 
bug in Perl 5.10)

my $bodysize = $#{@$body}+0;
while (${@{$body}}[$bodysize+0] !~ /^\s*@/) {

If that doesn't work either, I give up.

Jules

-- 
Julian Field MEng CITP CEng
www.MailScanner.info
Buy the MailScanner book at www.MailScanner.info/store

MailScanner customisation, or any advanced system administration help?
Contact me at Jules at Jules.FM

PGP footprint: EE81 D763 3DB0 0BFD E1DC 7222 11F6 5947 1415 B654
PGP public key: http://www.jules.fm/julesfm.asc


-- 
This message has been scanned for viruses and
dangerous content by MailScanner, and is
believed to be clean.