Creating and dereferencing a reference
#!/usr/bin/perl use strict; use warnings; my $variable = 10; my $reference = \$variable; print( "\$variable = $variable\n" ); print( "\$reference = $reference\n" ); print( "\$\$reference = $$reference\n" ); $variable++; print( "\$variable = $variable\n" ); print( "\$reference = $reference\n" ); print( "\$\$reference = $$reference\n" );