#!/usr/bin/perl

use strict;

my %hash = ( key => "data" );

print( 'ref(\%hash) = ', ref( \%hash ), "\n" );