#!/usr/bin/perl -w

my %hash;
my $var = "Oh";

$hash{'$var'} = 'Whatever';
$hash{"$var"} = 'Whatīs that';
$hash{$hash{"$var"}} = '? I really donīt have a clue!';

print "$var\n";
print "$var - $hash{$var}\n";
print "$hash{'$var'}\n";