DB<103> push( @Records, join ',', ( "AAA", 20130610, 730, 1015, "\n" ) );
 => 1

  DB<104> \@Records
 => ["AAA,20130610,730,1015,\n"]

##</code><code>##

  DB<106> push @Records, [ "AAA", 20130610, 730, 1015 ];
 => 1

  DB<107> \@Records
 => [["AAA", 20130610, 730, 1015]]

  DB<108> $Records[0][2]
 => 730