#!/usr/bin/perluse strict;my %hash = ( key => "data" );print( 'ref(\%hash) = ', ref( \%hash ), "\n" );