At 02:20 PM 18/07/2002, Bob Showalter wrote: >Each pass through the loop overwrites %numlegs, so it will only >contain one entry, corresponding to the last row.
So I found. >You can do something like this: > > while (my $a = $sth->fetchrow_arrayref) { > $numlegs{$a->[0]} = $numlegs{$a->[1]}; > } Ah! Close, but that gives me this idea: my @cols; while ( @cols = $sth->fetchrow ){ $numlegs{"$cols[0]"} = $cols[1] ; }; Which works. Thanks. >-- >To unsubscribe, e-mail: [EMAIL PROTECTED] >For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]