Help for this page

Select Code to Download

Select or download this

for $row (@rows){
    for $key (keys %{$row}){
        print "$key: $row->{$key}\n";
    }
}