req hash

[- $req = shift; -] [$ foreach $key (sort keys %$req) $] [$ endforeach $]
[+ $key +] [$ if (ref $req->{$key} eq 'HASH') $] [$ foreach $key2 (sort keys %{$req->{$key}}) $] [+ "$key2 -> $req->{$key}->{$key2}" +]
[$ endforeach $] [$ else $] [+ $req->{$key} +] [$ endif $]