Help for this page

Select Code to Download

Select or download this
my @second = map { [ @$_ ] ] @first;

Select or download this

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