You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
13 lines
410 B
Perl
13 lines
410 B
Perl
#!/usr/bin/perl
|
|
|
|
|
|
use warnings;
|
|
use strict;
|
|
|
|
my $variable = 9;
|
|
my $reference1 = \$variable;
|
|
print( "$variable, $reference1, $$reference1\n" );
|
|
my $reference2 = \$reference1;
|
|
print( "$variable, $reference1, $$reference1, $reference2, ", "$$reference2, $$$reference2\n" );
|
|
my $reference3 = \\\\$variable;
|
|
print( "$reference3, $$reference3, $$$reference3,\n", " $$$$reference3, $$$$$reference3\n" ); |