めも帖

「めも帖」代わりにダラダラと書いていったり、めもしたりしているだけです。

覚書 リファレンス渡し

my $from = \%form;
&makeHidden(\%form);

#----------------------------------------
# リファレンス渡し
#----------------------------------------
sub makeHidden{
	my($form) = @_;
	my $hidden_value = undef;

	while((my $key,my $value) = each(%{$form})){
		$hidden_value .= "$key"."$value"."<br>\n";
	}
	print $hidden_value;
}