Found a tangential reference to it here

http://www.perlmonks.org/?node_id=289954

which lead to this:

%hash = $query->Vars();
foreach $key (keys %hash) {
     print "<br> $key -> $hash{$key}\n";
}
[download]