sub parseAutorep {
    print join "\n", map defined ? "'$_'" : '<undef>', @_;
}

##</code><code>##

'Util'
'parse'

##</code><code>##

sub dispatch {
    my ($self, $fname) = (shift,shift);
    &{$dispatchTable{$fname}};
}