Usually you don't need to implement a destructor in Perl. but in case you do DESTROY is the name in standard perl and DEMOLISH in Moose.

Object Oriented Perl using Moose