my $ordtype = 'SEASONAL';
# ...
my $sql = "insert into that_table (a_col, b_col, c_col, d_col, e_col) values (?,'US','M10','WEDNESDAY',?)";

my $sth = $dbh->prepare( $sql );

for my $a_val ( @dlr_loc ) {
    $sth->execute( $a_val, $ordtype );
}