Help for this page

Select Code to Download

Select or download this
perl -e 'package X;sub TIEHASH{bless{},shift};tie my %x,"X";sub DESTROY{untie %x}'

Select or download this

#!/usr/bin/perl

...
sub EXISTS   { }
sub DELETE   { }
sub CLEAR    { }