my @pieces = ('<STN>PIKE RD & BUCK RD</STN>',
              "''' &amp;",
              'another mess');
my $sql = 'insert into mytable (location_desc) values (?);';
my $sth = $dbh->prepare($sql);
foreach (@pieces) {
  $sth->execute($_);
}