Help for this page

Select Code to Download


  1. or download this
    my $hr = $ST->fetchrow_hashref;
  2. or download this
    print join(", ", @{$ST->{NAME_lc}}), "\n";
  3. or download this
    my @results;
my $hr = $ST->fetchrow_arrayref;
for my $key (@{$ST->{NAME_lc}}) {
    push @results, { name=>$key, value=>$hr->{$key} };
}