Select Code to Download

my $sth = $db_h->Query(qq{
      SELECT `serial_num`, FROM_UNIXTIME(`trans_date`) AS `Action_date
+`, `actor`, `type`, `trans_data`, `content` FROM `transtable` ORDER B
+Y `serial_num`;
});