#!/usr/bin/perl
use Data::Dumper;

my $hr = {};

$hr->{foo} = 'blah';

$hr->{'fig'} = 'fruit';

$hr->{words}->[2] = 'hello';

$hr->{words}->[1]->{count}++;

# demonstrates that Perl does its best to make the right structures as you use them
print Dumper($hr);
