Thread Gelöschte Platte überschrieben: per Perlskript (8 answers)
Opened by Crian at 2005-01-12 17:42

Crian
 2005-01-12 18:09
#50721 #50721
User since
2003-08-04
5870 Artikel
ModeratorIn
[Homepage]
user image
In meinem Fall war Platte = USB-Stick. Da ich meinen gebrauchten verschenken möchte wollte ich meine Daten gründlich löschen. Ich weiß, da gibts schon fertige Tools für, aber ich fand die Idee es mit diesem Programm zu machen ganz reizvoll. Es hilft jedenfalls gegen einfaches undelete.
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View full thread Gelöschte Platte überschrieben: per Perlskript