Re: hash return from a sub

Flyzone wrote:
How can i return a copy of the hash? (The hash is build correct, but
return alsways null)
Here a sample of my code:

sub mysub {
while (.....) {
var1 = ....;
var2 = ....;
$myhash{$var1} = $var2;
}
print %myhash; # all ok until here
return ( %myhash );
}

%test=mysub();
print %test; # wrong, don't print nothing, neither error;

I would like to return a copy of the hash to a new variable, not a
reference.

There is nothing wrong with the code you have posted, although it is more usual
to pass and return hashes by reference. This program does what you have
described and works fine:

sub mysub {
$myhash{key} = 'val';
print %myhash, "\n";
return %myhash;
}

%test=mysub();
print %test, "\n";

You must

use strict;
use warnings;

at the start of your program, and declare all variables with 'my'. It is likely
that one of the variables is being overwritten elsewhere in your code, but it is
hard to tell from the precis you have shown.

If these measures do not help you then please show the real code that is causing
problems.

HTH,

Rob
.

Relevant Pages

  • RE: hash return from a sub
    ... return (%myhash); ... How can i return a copy of the hash? ... This e-mail may contain confidential information. ...
    (perl.beginners)
  • Re: hash return from a sub
    ... Flyzone wrote: ... return alsways null) ... print %myhash; ...
    (perl.beginners)
  • hash return from a sub
    ... How can i return a copy of the hash? ... return alsways null) ... print %myhash; ...
    (perl.beginners)