[ic] Intermittent error

[Stefan Hornburg]

On Fri, 7 Feb 2003 14:30:11 -0500
<interchange@cox.net> wrote:

> This doesn't happen all the time but enough to annoy the hell out of someone.
> some times when I 
> 1. log in
> 2. Enter a new item into the catalog
> 3. check out of my shopping cart
> 
> I get this error
> http://www.consolidatedbp.com/pdf/error.jpg
> 
> An this error in the error log
> 216.39.48.209 r4ZecWgr:216.39.48.209 - [31/January/2003:11:28:58 -0500] sales /cgi-bin/sales/L1518X5.html Safe: syntax error at (eval 482) line 13, near "x   push"
> > 
> > 
> >   my @out;
> >   my $ref;
> >   my $db;
> >   delete $Scratch->{promo_codes};
> >   my $date = $Tag->time( { body => '%Y%m%d' } );
> >   $ref = $Tmp->{main} or return;
> >   for(@$ref) {
> >    my $line = $_;
> >    push(@out, $line->[0]), next if ! $line->[1];
> >    next if $line->[2] gt $date;
> >    next if $line->[3] lt $date;
> > x   push @out, $line->[0];

Removing the x in the line above will avoid the syntax error you describe.

Bye
       Racke