On Sat, 16 Feb 2002 11:05:14 -0800, [EMAIL PROTECTED] (Vicki Brown) wrote:

> It took me a while to find the problem... when I did I was somewhat amused
> 
>  --- Begin Forward ---
> 
> 
>              if (...) {
>                 my @item_parts = split(/\n/, $item);
>                 printf ORDER ("\n%4d   %-50s   %3.2f      %3.2f\n",
>                            $quantity, $item_parts[0], $price, $ext);
>              } else {
>                  printf ORDER ("\n%4d   %-50s   %3.2f     %3.2f\n",
>              }                 $quantity, $item, $price, $ext);
> 
> 
> 
>  --- End Forward ---

I had to look a couple of times, too.

Cheers,
Philip

Reply via email to