our $reference  = "global";
{
    my $reference = "local";
    print "reference equals ${reference}, ";
    print "symbolic reference equals ${'reference'}.\n";
}
print "Here ${reference} and ${'reference'} both come out of the sysbol table.\n";
print "This also shows how local differs from local\n";
{
    local $reference = "local";
    print "reference equals ${reference}, ";
    print "symbolic reference equals ${'reference'}.\n";
}