Select Code to Download

use DBI;
  my ($db_name,$host_name,$port,$db_user,$db_pass,) = @_;
...
    push @bind, $value;
  }
  my $href = $dbh->selectall_hashref($sql, $col, {}, @bind);