#!/usr/bin/perl
use strict;
use warnings;
my %hash;
$hash{''} = 'foo';
print $hash{''};