c:\@Work\Perl\monks>perl -wMstrict -le
"use Data::Dump qw(dd);
 ;;
 my @ra = qw(0001 0002 0003 011 012 013 015);
 dd \@ra;
"
["0001", "0002", "0003", "011", "012", "013", "015"]