Now you have a question that is totally different from the original question. What you are asking for now are known as "bind variables." You need to do something like so (and, your code above is highly incomplete -- I will assume that you have better, more complete code in real life) --

my $sth = $dbh->prepare(qq{
  INSERT into pac.promo_rpt (
    dlrcode, dlrgroup, division, country, planner,
    ordertype, daysofsupply, run_dow, sof_or_excel, abc_codes
  ) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?)
});

$sth->execute( $foo, $bar, $baz, $qux... );
[download]

The number of bind variables in the execute step have to be the same and in the same order as represented by the ? in the prepared statement. Look up the docs on bind variables in DBI.pm.