{
package QUAD_echo_hash;
sub TIEHASH{ bless {} }
sub FIRSTKEY { undef }
# return the text of the key
sub FETCH { $_[1] }
}
tie my %echo_hash, 'QUAD_echo_hash';
handy for writing the loader after the accessor is complete.
--
the courts of justice shall be open to every person, and certain remedy
afforded for every injury to person, property or character, and that right
and justice shall be administered without sale, denial or delay. --
Missouri Constitution, Art. I, Sec. 14
_______________________________________________
kc mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/kc
