#!/usr/bin/perl -w

use Data::Dumper;

{
  my $hashref = {'foo' => "bar"};

  print Dumper($hashref);
}