use CGI::WML;

my $q = new CGI::WML;
print $q->param('foo'), "\n"; 

# results:
[jeffa@trinity cgi-bin]$ ./wml.cgi foo=bar
bar