5 lines
75 B
Perl
5 lines
75 B
Perl
$text = "Hello";
|
|
$encrypted = crypt $text, "AB";
|
|
print $encrypted;
|
|
|
|
|
$text = "Hello";
|
|
$encrypted = crypt $text, "AB";
|
|
print $encrypted;
|
|
|
|
|