Try this. You didn't provide any sample data, so this is untested.
$data{ week } = \%week_day_date;
$data{ eng } = \%eng_info;
&build_table_date( 5, %data );
sub build_table_date {
my( $rows, %data ) = @_;
foreach $row ( 1..$rows ) {
print"rows $row $rows $data{ week }{ $rows }<br>";
}
}
-----Original Message-----
From: Jerry Preston [mailto:[EMAIL PROTECTED]]
Sent: Friday, January 18, 2002 11:53 AM
To: begginners
Subject: hashing - cannot remember how :(
Hi,
This is DUMB, but I cannot remember how?
I have two hashes and I want to pass them:
$data{ week } = %week_day_date;
$data{ eng } = %eng_info;
&build_table_date( 5, %data );
then:
sub build_table_date {
my( $rows, %data ) = @_;
foreach $row ( 1..$rows ) {
print"rows $row $rows *$data{ week }{ $rows }<br>";
}
But I get no data from $data{ week }{ $rows }!
I know this is simple, but what am I doing wrong?
Thanks for your help,
Jerry
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]