Robert,
Sorry about the" no data", but your code worked!!
Thanks,
Jerry
"Hanson, Robert" wrote:
> 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]
