Increments 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" ); $$reference++; print( "\$variable = $variable\n" ); print( "\$reference = $reference\n" ); print( "\$\$reference = $$reference\n" );