Dave's Free Press

Technology: Tie-Hash-Longest-1.1

 

Older stuff

Tie::Hash::Longest - A hash which knows its longest key and value


NAME

Tie::Hash::Longest - A hash which knows its longest key and value


SYNOPSIS

  use Tie::Hash::Longest;
  tie my %hash, 'Tie::Hash::Longest';
  %hash = (
    a => 'ant',
    b => 'bear',
    elephant => 'e'
  );
  # prints elephant
  print tied(%hash)->longestkey();
  # prints bear 
  print tied(%hash)->longestvalue();


DESCRIPTION

This module implements a hash which remembers its longest key and value. It avoids rescanning the entire hash whenever possible.


METHODS

The following methods are available. Call them thus:

tied(%my_hash)->methodname();

longestkey
Return the longest key.

longestvalue
Return the longest value.


AUTHOR

David Cantrell <david@cantrell.org.uk>. I welcome feedback.


COPYRIGHT

Copyright 2001 David Cantrell.

This module is licensed under the same terms as perl itself.


SEE ALSO

Tie::Hash(3)