in reply to Perl Wipeout!!

You could do such a script - but who tells you that your partner doesn't have his own private copies of the files, and/or tries the same? So if something happens it's up to a lawyer anyway, if nothing happens doing backups is always a good strategy.
use signature; signature(" So long\nAlfie");