translate perlrun