lineObj
$line = new mapscript::lineObj(); $numpoints = $line->{numpoints}; for($j=0; $j<$numpoints; $j++) { $point = $line->get($j); } my $line = new mapscript::lineObj(); my $point = new mapscript::pointObj(); while (<POINTS>) { $point->{x} = $long; $point->{y} = $lat; $line->add($point); }
back to PerlMapScript
Last modified
15 years ago
Last modified on Jan 29, 2009, 10:19:15 AM
Note:
See TracWiki
for help on using the wiki.