Thread Lizenzierung in Perl
(17 answers)
Opened by YAPD at 2015-11-18 00:17
NTFS hat doch Hidden Streams,
https://de.wikipedia.org/wiki/Alternativer_Datenst... Pack da die Lizenzdaten rein. Exemplarischer Code (nur zum Lernen): Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 open my $FH, '>', 'test.txt' or die $!; # normaler Text print $FH '4711'; close $FH; open $FH, '>', 'test.txt:prog.lic' or die $!; # Lizenzdaten schreiben print $FH 'LZK: <0xDEADBEEF>'; close $FH; open $FH, '<', 'test.txt:prog.lic' or die $!; # Lizenzdaten lesen print scalar <$FH>; close $FH; Aber jeder der wirklich will, krieg sowas auch raus. ---- bei der Lizenz würde ich folgendes Grobkonzept wählen: Code: (dl
)
1 Client überprüft beim Programmstart, ob die Signatur-Datei existiert Crypt::OpenPGP kann OpenPGP-Signaturen prüfen Last edited: 2015-11-28 12:55:03 +0100 (CET) |