no point in using fetchrow_hashref if you're a) getting all the rows ("selectall" instead of "fetchrow") and b) want an array ("arrayref" instead of "hashref"):

my @rec_data = @{ $db->selectall_arrayref($select) };
foreach my $i ( 0 .. $#rec_data ){
  printf "%d) (recno,name)=(%s, %s)\n", $i+1, @{$rec_data[$i]};
}
[download]