Here is a sample program that generates references. You can also get the file here.

#!/usr/bin/perl -w
my $a = 5;
my $b = \$a;
my $c = \$a;
my $d = [ $a ];
my $e = [ $a ];
print "\$a = $a\n";
print "\$b = $b\n";
print "\$c = $c\n";
print "\$d = $d\n";
print "\$e = $e\n";
print "\$\$b = $$b\n";
print "\$\$c = $$c\n";
print "\$\$d[0] = $$d[0]\n";

Here is its output:

$a = 5
$b = SCALAR(0x180b548)
$c = SCALAR(0x180b548)
$d = ARRAY(0x1801380)
$e = ARRAY(0x1801470)
$$b = 5
$$c = 5
$$d[0] = 5