lots of DESTROYs

This commit is contained in:
Matthew Wilson 2006-01-14 22:26:48 +00:00
parent 5b076ae9e5
commit 3c66a9105f
15 changed files with 197 additions and 4 deletions

View file

@ -101,6 +101,20 @@ sub deleteName {
}
#-------------------------------------------------------------------
=head DESTROY ( )
Deconstructor.
=cut
sub DESTROY {
my $self = shift;
undef $self;
}
#-------------------------------------------------------------------
=head2 get( varName )