hi,
how do i reset a foreach loop so that it starts at the top each time?

a sample of my code looks like:

foreach $zrec (@file)              # file with agent and city
{ chomp($zrec);
   foreach $zkey (@template)       # put agent city data into hash
   { $hash{$zkey},$zrec)=split(/\//,$zrec,2);
   }
   foreach $zrec2 (@list)          # table with city and zipcode
   { chomp($zrec2);
     foreach $zkey2 (@template2)   # put city zipcode data into hash
     { ($hash2{$zkey2}, $zrec2)=split(/\//,$zrec2,2);
     }
     last if ($hash{city} eq $hash2{city});
  }
  print "agent='$hash{agent}' city='$hash{city}'
zipcode='$hash2{zipcode}'\n";
}

the code looks like it should work ... but the 2nd and 3rd foreach loops

do not behave as expected.  :(
i have read about 'reset' and 'continue blocks' but have not been able
to make them reset the foreach loops and @list processing to work as
i would like them to.

two questions:
1. EXACTLY how should the code be written to ALWAYS start a foreach
    loop at the beginning?
2. EXACTLY how should the code be written so that a foreach loop on
    a @list ALWAYS starts at the beginning of a @list?

thanks,
jim


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to