Select Code to Download

my ( $rold, $rnew ) = map scalar reverse, $old, $new;

my $rold = reverse $old;
my $rnew = reverse $new;