Perl - xortool
Heute hab ich in Perl ein kleines Tool geschrieben, mit welchem man eine Datei bzw. deren Inhalt zeichenweise XOR verschlüsseln kann.
Dazu übergibt man dem Tool die Originaldatei, Zieldatei und natürlich den Schlüssel. Nun wendet das Tool das erste Zeichen des Schlüssels auf das erste Zeichen der Originaldatei an, danach das zweite Zeichen des Schlüssels auf das zweite Zeichen der Datei usw.
Verschlüsselung
./xortool originaldatei.txt verschlüsseltedatei.txt 1234
Entschlüsselung
./xortool verschlüsseltedatei.txt unverschlüsseltedatei.txt 1234
Hier der Code:
Continue reading "Perl - xortool"