Help for this page

Select Code to Download


  1. or download this
    use URI;
use URI::QueryParam;

my $u = URI->new('http://www.com/index.pl?id=<idparm>&etc');
print $u->query_param('id'), "\n";
  2. or download this
    my $u = URI->new('http://www.com/index.pl?id=<idparm>&foo=bar&etc');
my @val = grep /<([^>]+)/, map $u->query_param($_), $u->query_param();
print $_,$/ for @val;
  3. or download this
    @value = $URL =~ /(<[^>]+>)/;