[Pdx-pm] Read only?

[Eric Wilhelm]

# from Kris Bosland
# on Sunday 17 September 2006 01:48 pm:

>        my @columns = @{$softtable->[3]};
>        is(join(' ',map { $_->{val} } @columns),"100","set1 first
> bin");
>
>So, it doesn't like my dereference notation for some reason.

Hmm.  What's a softtable?

  $ perl -Mwarnings -Mstrict -e \
    'my $softtable = [[{}],[{}],[{}],[{val => 2, bar => 1}]];
    print join(" ", map { $_->{val} } @{$softtable->[3]})'
  2

--Eric
-- 
The more you learn about Linux, the more you hate Windows.
--Gary Varnell
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------