Help for this page

Select Code to Download


  1. or download this
    # untested
    sub DESTROY {
     my ($self) = @_;
     die "destroy called with non-empty stack" if $self->stack_count;
    }