LINUX.ORG.RU

История изменений

Исправление kirk_johnson, (текущая версия) :

Фраза из README оригинального проекта, объясняющая всю суть происходящего:

I have no idea what anyone would want to use this for.

Алсо УМВР:

$ cat test.pl 
#!/usr/bin/perl

use 5.016;

use strict;
use warnings;

use Encode;
use Encode::RAD50;

my $rad50 = encode('RAD50', 'FOO');
my $ascii = decode('rad50', pack 'n', 10215);

say("RAD50: $rad50");
say("ASCII: $ascii");
$./test.pl 
RAD50: 'ç
ASCII: FOO

Исходная версия kirk_johnson, :

Фраза из README оригинального проекта, объясняющая всю суть происходящего:

I have no idea what anyone would want to use this for.