Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
use warnings;
...
my $url_parm = uri_escape 'http://www.whatzit.com?a=1&b=2';
my $url = "http:/www.xyzzy.com?url=$url_parm";
print $url, "\n";

Select or download this

my $url_parm = 'http://www.whatzit.com?a=1&b=2';
$url_parm =~ s/&/&amp;/sg;
my $url = "http:/www.xyzzy.com?url=$url_parm";