in reply to a reference to an element of an array or hash: how to create?

#!/usr/bin/perl

use warnings;
use strict;

my @array = qw(1 2 3 4);

my $r = \$array[2];
$$r = 5;
print @array;

[download]

In Section Seekers of Perl Wisdom