For what it's worth, you should use strict and use warnings:

my $hash_ref;
...
$hashref = $dbh->selectall_hashref($sql, 'filename', ...
[download]