Select Code to Download

open my $fh, '<', '/the/file/with/txtque'
  or die "unable to open ...: $!\n";
...
    my $count = $dbh->do(...); # execute the INSERT statement here
  }
}