Porting a Perl-based exploit