$ perl -MCGI=foo -le 'print foo({-bar => "baz"})'
<FOO BAR="baz">