my @duplicate; my @times_two = map { my $val = $_ * 2; push @duplicate, $_; $_ } (1 .. 12);