#!/usr/bin/perl
%my_hash=('k1',"123","k2",["Bach","Bachi"]);
@my_aray=@$my_hash{"k2"};
print "First try \n";
print @my_aray;
print"Second try \n";
$temp=$my_hash{"k2"};
@my_aray=@$temp;
print @my_aray;
print "\n";