mk-kml.perl - diff

Return to mk-kml.perl CVS log

Up to [Omarama Landouts]

version 3.3, 2025/03/29 01:58:56	version 3.4, 2025/05/18 05:02:15
Line 12 print KML q{<?xml version="1.0" encoding	Line 12 print KML q{<?xml version="1.0" encoding

my $json = JSON->new;	my $json = JSON->new;

open my $fh, '<', $ARGV[0] or die "error opening $ARGV[0] $!\n";	open my $fh, '<', OmLand.geojson or die "error opening OmLand.geojson $!\n";
my $text = do { local $/; <$fh> };	my $text = do { local $/; <$fh> };
close $fh;	close $fh;