layerObj:

my $layer = $map->getLayerByName('green') or die("Unable to Open Scanned Image Layer!");

$layer->{status} = $mapscript::MS_ON;

$layer->{data} = "$scan.tif";

my $s_layer = $map->getLayerByName('selected') or die('Unable to Open the Selected Parcel Layer!');

$s_layer->{status} = $mapscript::MS_ON;

$s_layer->{data} = $s_shapefile_name;

my $s_class = $s_layer->getClass(0);

$s_layer->{transparency} = 100;


Selected Polygon Transparent Over Scanned Image