Select Code to Download

package Whatever;

...
}

sub DESTROY { our $_total_destroyed; $_total_destroyed++ }