1431024666
1431037440
1431038327

##</code><code>##

#!/usr/bin/perl

@ab=`ls | awk -F'[_]' '{print $2}'`;
print "\@ab = @ab";

##</code><code>##

@ab = ab_1431024666_1430960820_36398
 ab_1431037440_1430958175_36390
 ab_1431038327_1430958130_36387