use Data::Dumper qw/Dumper/; my @first = ( ['1','2','3'], ['11','22','33'] ); my @second = @{ eval Dumper(\@first) };