Opaspap

на perl используя search.cpan.org/~mithun/URI-Encode-0.09/lib/URI/En...

#!/usr/bin/perl
use URI::Encode qw(uri_encode uri_decode);
my $arg=shift,$decode=shift;
if ($decode) {
        print uri_decode($arg);
} else {
        utf8::decode($arg);
        print uri_encode($arg);
}
print "\n";

первый агумент - строка, второй - если есть, то строку декодировать, если нет - кодировать.

модуль URI::Encode написан на perl, маленький, его можно установить из репозитария вашего дистра, используя cpan или скопипастить из исходника. perl есть практически в каждой системе.