The goal of this Perl script is to [thoroughly] just delete the contents of a hard drive.