#!/usr/bin/perl

$a = "foo";
$b = \$a;


print "b : $$b\n";

print "b2 : ${$b}\n";