Select Code to Download

use Data::Dumper;

...

my @test = map { s/\s//g; $_ } @test;
print Dumper(\@test);

$VAR1 = [
          'aaabbbbbcccc'
        ];