= colorObj =
{{{
#!perl
$map->{scalebar}->{imagecolor}->{green} = 200; # ** colorObj **
$map->{scalebar}->{imagecolor}->{red} = 0;
$map->{scalebar}->{imagecolor}->{blue} = 0;
}}}
----
back to PerlMapScript