Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re^2: RFC: CGI::Tables (topicalize with for)

by Aristotle (Chancellor)
on May 10, 2003 at 18:13 UTC ( #257148=note: print w/replies, xml ) Need Help??

in reply to Re: RFC: CGI::Tables
in thread RFC: CGI::Tables

Or maybe
my $attrs = ref eq 'HASH' ? $_ : {} for shift @$data;
which I find a lot less clumsy. Update: was ref $_ before.

Makeshifts last the longest.

Replies are listed 'Best First'.
Re^3: RFC: CGI::Tables (topicalize with for)
by chip (Curate) on May 11, 2003 at 01:14 UTC
    Absolutely; I often topicalize with for. But I'd also write "ref $_" as "ref" or "ref()" -- concision!

        -- Chip Salzenberg, Free-Floating Agent of Chaos

      I don't generally like foo() much for routines that operate on $_. In this case I added it because I'd've had to if I'd written
      'HASH' eq ref ? $_ : {}
      as the question mark is then parsed as a pattern delimiter instead of as part of a ternary. I usually write my comparisons that way around. But here neither the parens nor the variable is necessary as the following eq is unambiguous as to its meaning.

      Makeshifts last the longest.

Re: Re^2: RFC: CGI::Tables (topicalize with for)
by chip (Curate) on May 11, 2003 at 03:28 UTC
    Oops! Your substitution is actually really broken, because when $data[0] isn't a HASH, it gets thrown away. This is a Bad Thing. I didn't notice it at first, which is also a Bad Thing. :-,

        -- Chip Salzenberg, Free-Floating Agent of Chaos

      I knew full well about that, but didn't pay close enough attention to know it's undesired. Also a Bad Thing..

      Makeshifts last the longest.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://257148]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (8)
As of 2020-01-17 12:42 GMT
Find Nodes?
    Voting Booth?