=head1 NAME

Hash::Case::Upper - native hash with enforced lower cased keys

=head1 INHERITANCE

 Hash::Case::Upper
   is a Hash::Case
   is a Tie::StdHash

=head1 SYNOPSIS

 use Hash::Case::Upper;
 tie my(%uchash), 'Hash::Case::Upper';
 $uchash{StraNGeKeY} = 3;
 print keys %uchash;  # STRANGEKEY

=head1 DESCRIPTION

C<Hash::Case::Upper> extends L<Hash::Case|Hash::Case>, which lets you play various trics
with hash keys.  See L<Hash::Case|Hash::Case> for the other implementations.

=head1 METHODS

$obj-E<gt>B<addHashData>(HASH)

=over 4

See L<Hash::Case/"METHODS">

=back

$obj-E<gt>B<addPairs>(PAIRS)

=over 4

See L<Hash::Case/"METHODS">

=back

$obj-E<gt>B<setHash>(HASH)

=over 4

See L<Hash::Case/"METHODS">

=back

B<tie>(HASH, 'Hash::Case::Upper', [VALUES,] OPTIONS)

=over 4

Define HASH to have only upper cased keys.  The hash is
initialized with the VALUES, specified as ref-array or
ref-hash.  Currently, there are no OPTIONS defined.

=back

=head1 SEE ALSO

This module is part of Hash-Case distribution version 1.004,
built on June 08, 2007. Website: F<http://perl.overmeer.net/hash-case/>

=head1 LICENSE

Copyrights 2002-2003,-2007 by Mark Overmeer. For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
See F<http://www.perl.com/perl/misc/Artistic.html>