Select Code to Download

my $ref = $dbh->selectall_arrayref(
    "SELECT field1, field2 FROM location
     WHERE restriction = 'RESTRICTION NAME'",
    { Slice => {} }
);

for my $row_ref ( @{$ref} ) {
    # do something awesome with $row_ref->{field1} and $row_ref->{fiel
+d2}.
}