You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
shptosvg.pl shows this error message when run using perl v5:
"Legacy library getopt.pl will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at ./shptosvg.pl, line 46."
Getopt::Std has replaced getopt.pl . Here's the change I added to my copy:
$ diff -c shptosvg-orig.pl shptosvg.pl
*** shptosvg-orig.pl 2013-04-05 16:57:08.972985300 -0700--- shptosvg.pl 2013-04-05 16:56:18.625691100 -0700****************** 36,41 ****--- 36,42 ----
use Geo::Proj4 ;
use Math::Polygon ;
use Math::Polygon::Clip ;
+ use Getopt::Std;
my $default_width = 72 * 8 ;
my $default_height = 72 * 10 ;
****************** 43,50 ****
#-- basic command line parameter processing
! require 'getopt.pl' ;! &Getopt ('xySTpdC') ;
sub Usage { my ($msg) = @_ ;
print STDERR $msg, "\n" if ($msg ne "") ;
print STDERR <<_EOU;
--- 44,52 ----
#-- basic command line parameter processing
! # require 'getopt.pl' ;! # &Getopt ('xySTpdC') ;! getopt('xySTpdC');
sub Usage { my ($msg) = @_ ;
print STDERR $msg, "\n" if ($msg ne "") ;
print STDERR <<_EOU;
The text was updated successfully, but these errors were encountered:
shptosvg.pl shows this error message when run using perl v5:
"Legacy library getopt.pl will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at ./shptosvg.pl, line 46."
Getopt::Std has replaced getopt.pl . Here's the change I added to my copy:
The text was updated successfully, but these errors were encountered: