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]

Reply via email to