PHP Funktion in Perl übernehmen

[Christoph]

Hallo,

ich habe folgendes Problem.

Ich habe die Aufgabe ein altes PHP Skript in Perl zu überführen.
Mein Problem ist die Funktion "urlencode".
Bei meiner Recherche bin ich soweit das Perl über keine entsprechende Funktion verfügt.

Der Code Abschnitt:

$xurl .= "&JA=".urlencode($jname);
$xurl .= "&JT=".urlencode($journal);
$xurl .= "&VOL=".urlencode($vol);
$xurl .= "&PG=".urlencode($pages);
$xurl .= "&AAU=".urlencode($author);
$xurl .= "&ATI=".urlencode($title);
$xurl .= "&APY=".substr(urlencode($year),0,4);

Kann mir jemand einen Tipp geben wie ich das in Perl nachbilden kann?

Vielen Dank im voraus!
Christoph