From davidnicol at gmail.com Mon Apr 3 13:53:29 2017 From: davidnicol at gmail.com (David Nicol) Date: Mon, 3 Apr 2017 15:53:29 -0500 Subject: [Kc] quick and dirty hash that echoes the keys as the values Message-ID: { 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 -------------- next part -------------- An HTML attachment was scrubbed... URL: