Re: Extracting data from SimpleList

[muppet <scott asofyet org>]

On Jan 6, 2005, at 8:16 PM, Scott wrote:

> sub shout_it {
>         @indices = $slist -> get_selected_indices;
>         
>         foreach $i (@indices) {
>                 print $i . "\n"; # I'd rather print the actual data here.

                print "row $i is ".join (", ", @{ $slist->{data}[$i] })."\n";

>         }
> }

Note that even though you have only one column of data 
$slist->{data}[$i] is still a reference to an array of columns.

--
"Erections lasting more than four hours, while rare, require immediate 
medical attention."
        -- Commercial for a viagra-like drug.