$TransDate=$stuff[1];
$TransPmtAmt=$stuff[2];
$FormatTransDate = substr($TransDate, 0, 10);
$FormatTransPmtAmt = sprintf("\$%.2f", $TransPmtAmt);

             print $FormatTransDate;
             print "    ";
             print $FormatTransPmtAmt;