At 04:41 PM 7/2/01 -0400, Jeff 'japhy' Pinyan wrote:
>On Jul 2, Peter Cline said:
>
> >if (/^(.+)_(\d+)$/) {
> >          $script_info[$2] = { 'id' => $2, } unless {
> >defined($script_info[$2]) };
> >          $script_info[$2]->{$1} = $q->param("$_");
> >       }
> >
> >and thereby eliminated my problem.
>
>Or not.
>
>   print "foo" unless { 1 };
>   print "bar" unless { 0 };
>
>That prints "foo" and "bar", and if -w was on, you'd be told your hash
>references have an odd number of elements.  Leave off those braces,
>please.

Yes of course, in my haste I made a stupid mistake.  Of course the braces 
should not be there.
Peter Cline
Inet Developer
New York Times Digital

Reply via email to