Select Code to Download

BEGIN{unshift(@INC,'/home/yourusername/public_html/cgi-bin')}
use RC4;

#!/usr/bin/perl
use strict;
...
my $decrypted = RC4($key, $decoded);
print "$decrypted\n";