On Thursday 29 Apr 2010, Remy Guo wrote:
> I got the concept...but how to pass the reference? I'm really not familiar
> with the reference....too bad. :(

sub Function1  {
 my %hash;
 $hash{fred} = 1; 
 &Function2 (\%hash);
 ...
}

sub Function2 {
 my ($href) = @_;
 ......
 if ($fred != $href->{fred})  
 {
   print "fred failed.\n";
 }
}

Regards,
Akhthar Parvez K
http://Tips.SysAdminGUIDE.COM
UNIX is basically a simple operating system, but you have to be a genius to 
understand the simplicity - Dennie Richie

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to