#!/usr/bin/perl5.10 -w

my %hash1 = {
  test1 => 'test1',
  test2 => 'test2'  
};

no warnings;
my %hash2 = {
  test1 => 'test1',
  test2 => 'test2'  
};

use warnings;
my %hash3 = {
  test1 => 'test1',
  test2 => 'test2'  
};