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

[Julian Field]

On 3/8/09 9:52 AM, Drew Marshall wrote:
> On 7 Mar 2009, at 20:49, Julian Field wrote:
>
>> Okay, so the new chunk of code just there says this:
>>
>>  if ($configwords[1] =~ /tr[ua]/i) {
>>    #print STDERR "Trackback:\n";
>>    while(${@{$body}}[$#body] !~ /^\s*$/) {
>>      #print "Line is ****" . ${@{$body}}[scalar(@{$body})-1] . "****\n";
>>      pop @{$body};
>>      #print STDERR ".";
>>    }
>>
>>    #print STDERR "\n";
>>    $b->Done();
>>    return;
>>  }
>>
>> See if that helps your problem.
>
> Ok new code in and the error reads:
>
> Global symbol "@body" requires explicit package name at 
> /usr/share/MailScanner//MailScanner/PFDiskStore.pm line 509.
> Compilation failed in require at /usr/sbin/MailScanner line 354.
Okay, try changing your line 509 to say this instead:
while(${@{$body}}[$#{@$body}] !~ /^\s*$/) {
That does at least compile ( sorry about that :-(

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.