#/usr/bin/perl
%new_hash = ('first',1,'second',2);
#print $new_hash{ 'first' };
#print "\n";
@new_array = %new_hash; #哈希转数组
print "1111111111\n";
print @new_array;
print "\n";
print "1111111111\n";
print $new_array[3];
print "33333333333\n";
foreach (@new_array) {
print $_;
print "\n";
}
print $new_array[3];
print "\n";