G'day everyone

I'm confused. I'm trying to make use of Tie::Hash::TwoWay to give me
access to a dictionary of word <=> misspelling. Has anyone got any
idea how I would use TwoWay for this? Nothing I do seems to work.

  my $secondary = $dict->{0};
  while ( ($k, $v) = ( each %$secondary ) ) {
      print $k . "\t" . $v . "\n";
  }

  my $primary = $dict->{1};
  while ( ($k, $v) = ( each %$primary ) ) {
      print $k . "\t" . $v . "\n";
  }

Kind regards,
Bruce.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to