RosettaCodeData/Task/Pointers-and-references/Perl/pointers-and-references-1.pl
2023-07-01 13:44:08 -04:00

9 lines
217 B
Perl

# start with some var definitions
my $scalar = 'aa';
my @array = ('bb', 'cc');
my %hash = ( dd => 'DD', ee => 'EE' );
# make references
my $scalarref = \$scalar;
my $arrayref = \@array;
my $hashref = \%hash;