mapscript perl interface questions continue

[Joseph Norris]

Hello to all,

I have been experimenting with the perl mapscript interface and I have the
following question:

Given the following code:

sub build_file{
    my $gif_file = 'tttt.gif';
    my $mapfile_loc =
"/usr/local/apache/htdocs/mco.communityservers.com/htdocs/maps/teacher";
    my $mapfile_data = "$mapfile_loc/tdata";
    my $mapfile = "$mapfile_loc/cal.map";
    my $map = new mapscript::mapObj($mapfile);
    my $image = $map->draw();
    my $file_location =
'/usr/local/apache/htdocs/mco.communityservers.com/htdocs/maps/tmp';
    unlink "$file_location/$gif_file";
    mapscript::msSaveImage($map, $image, "$file_location/$gif_file");


Can I build a new shape file and add it as a layer to this map and then
redraw the map again?


I do not see the way to do this in the demo perl scripts.

Thanks



#Joseph Norris (Perl - what else is there?/Linux/CGI/Mysql) print @c=map chr
$_+100,(6,17,15,16,-68,-3,10,11,16,4,1,14,-68,12,1,14,8,-68,4,-3,-1,7,1,14,-
68,-26,11,15,1,12,4,-68,-22,11,14,14,5,15,-90);