В crypt.pl ошибочка вкралася...

Отсутствует стока выдачи Content-type...

Правильно будет:

#!/usr/bin/perl
my ($string,$key)=split /|/, $ENV{'QUERY_STRING'};
print "Content-type: text/plain\n\n";
print crypt($string,$key);