my @new = @letters; #### my $myshift = shift @letters; push(@letters, $myshift);