Re: hash

Bobby wrote:
>
> This is what i'm trying to accomplish. I want to be able to print the
> equivalent EU to US sizes. For example in the flat file data, the US size 10
> has the equivalent of Euro 34, US 11=35 Euro. My idea was to put the US sizes
> in a hash (%US) and the Euro in another hash (%EU) ; use the pid as the key
> in both hashes, loop through and compare if key (pid) exists in both then
> print the equivalent sizes $US{$us_size} - $EU{euro_size}. It seems easy
> enough, but i think my syntax or use of hash is incorrect.
> 
> pid|us_size|euro_size
> 1|10|34
> 2|11|35
> 3|12|37
> 4|13|38

From that it sounds like the values for PID are irrelevant and you simply need
to relate each EU size with a US size. Are the Euro sizes also unique? Or can
one Euro size have multiple US equivalents?

The code snippet below may help.

Rob


my %eu_to_us;

while (<DATA>) {
  my ($pid, $us, $eu) = split /\|/;
  $eu_to_us{$eu} = $us;
}