= legendObj = {{{ #!perl $map->{legend}->{width} = 18; $map->{legend}->{height} = 12; }}} ---- back to PerlMapScript