Basically you may use something like this (note that this is old fashioned perl style - before references were invented)
%a = (ak1 => av1, ak2 => av2); %b = (bk1 => bv1, bk2 => bv2); func (*a, *b); foreach $a (keys %a) { print "$a => $a{$a}\n"; } foreach $b (keys %b) { print "$b => $b{$b}\n"; } sub func { local(*c, *d) = @_; %c = (ck1 => cv1, ck2 => cv2); %d = (dk1 => dv1, dk2 => dv2); } Kiril Serebnik -----Original Message----- From: Philip Morley [mailto:PMorley@;edisonmission.com] Sent: Tuesday, October 29, 2002 6:21 PM To: [EMAIL PROTECTED] Subject: Passing multiple hashes into a sub-routine and returning them Please can someone help me with the above? Basically what I want to do is something like this: (%a, %b) = func(%a, %b); Where I am passing two hashes into the function "func", modifying their contents within it an returning them. If I pass the hashes in by reference, how do I access them in func? Thanks, Phil. _______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs