@array1
abc abc abc abc abc
abc abc abc2 abc3 abc4 abc5
abc abc abc1 abc2

##</code><code>##

@array1 = (
  'abc abc abc abc abc',
  'abc abc abc2 abc3 abc4 abc5',
  'abc abc abc1 abc2'
);

##</code><code>##

use Data::Dumper;
$Data::Dumper::Useqq=1;
print Dumper \@array;