Select Code to Download

use strict;
use warnings;
...
    push @new, (join '', @vals);
}
print "new: @new\n";

ar: AJK DHAK AESR ADADK LASR R ASDASDK ASEK A
new: AJKDHAK AESRADADK LASRR ASDASDKASEK A