my $tdate = $fields[0];
  print "$tdate\n";
my $trade_dt=UnixDate($tdate,"%Y-%m-%d");
#  my $trade_dt = DATE(\"$tdate\");
  print "$trade_dt\n";

##</code><code>##

...
print "TDATE: [$tdate]\n";
...
print "TRADE_DT: [$trade_dt]\n";
...

##</code><code>##

TDATE: [10/14/2011]
TRADE_DT: []