my %hash = (Script => "Perl",
              script_1=>"Ruby",
              script_2=> "PHP");

$href = \%hash;

for my $k (keys %{$href}) {
          print "$k => ${$href}{$k}\n";
}
[download]