pop

• pop removes the last element of an array and returns it:

@players = qw< Mario Luigi Toad Princess >;
my $favorite_player = pop @players;