Skip to content

Instantly share code, notes, and snippets.

@motemen motemen/
Last active Nov 11, 2016

What would you like to do?
$] = 5.008008
$URI::VERSION = 1.71
use strict;
use warnings;
use URI;
use URI::QueryParam;
print "\$] = $]\n";
print "\$URI::VERSION = $URI::VERSION\n";
my $u = URI->new('');
$u->query_param(hoge => 'ほげ');
print "$u\n";
use utf8;
$u->query_param(foo => 'bar');
print "$u\n";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.