[SP-pm] destruir um objeto e die

[Otávio Fernandes]

Fala Recsky,

Eu tenho uma sugestão:

BEGIN{ $SIG{__DIE__} = \&umount_volumes }

sub umount_volumes {
    print "Desmontando os volumes X, Y e Z";
}

Acredito que esta é a forma mais simples de resolver o seu problema.

um abraço,

Otávio Fernandes <otaviof at gmail.com>
http://otaviof.blogspot.com/