use v6-alpha;
use Test; plan 2;
use CGI;
my $q = CGI.new;
{
my $in is ro = '<';
my $out = $q.escapeHTML($in);
is($out, '<', "basic escapeHTML test");
my $back = $q.unescapeHTML($out);
is($back, $in, "basic unescapeHTML test");
}