DB<39> x @input
0  2
1  7
2  11
3  15
  DB<40> use experimental 'refaliasing'; \$input[1] = \$input[-1]

  DB<41> x @input
0  2
1  15
2  11
3  15
  DB<42> for my $v (@input) { say $v if \$v==\$input[-1] }
15
15

  DB<43>