Re: deferencing an hash in a subroutine

[murugu]

in reply to deferencing an hash in a subroutine

saintex, But in your code you are not using the reference at all. I think if you want to change the original values, Then pass by reference and change it.

#!/usr/bin/perl -w
use strict;

my %h = qw(a b c d);
&test(\%h);
while ( my ($key, $value) = each(%h) ){
    print "Key\t $key Value\t $value\n";
   }

sub test {
    my $h = shift;
    $h->{a}= "k";
    .....
    Some Code
    .......
}

[saintex]

ok, so I will simply do a call like this:

&elabora_st ('prepare',\%q);


Thank yoU!