Lines Matching refs:DESTROY
374 # We provide a DESTROY method so that we can ensure that
375 # temporary files are closed (via Fh->DESTROY) before they
376 # are unlinked (via CGITempFile->DESTROY) because it is not
378 # call DESTROY on each, rather than just undefing them and
379 # letting Perl DESTROY them by garbage collection, in case the
381 sub DESTROY {
385 $href->{hndl}->DESTROY if defined $href->{hndl};
386 $href->{name}->DESTROY if defined $href->{name};
856 $code = "sub $AUTOLOAD { }" if (!$code and $func_name eq 'DESTROY');
3665 sub DESTROY {
3735 sub DESTROY {}
4023 sub DESTROY {