#!/usr/bin/perl

use lib "/mt/apps/gpms/DateTrans/lib";
use  xsdxsltcheck qw(xsdcheck xsltcheck FGDC2MRFcheck xsl4mrf2fgdccheck);

#$JSONModuleDirLocation="/mt/apps/gpms/XML2JSON/XML-XML2JSON-0.06/lib/XML";

use lib "/mt/apps/gpms/XML2JSON/XML-XML2JSON-0.06/lib/";
use  XML::XML2JSON;


$infile="sample2JSONXML.xml";
#$infile="sampleJSONXML.xml";
$geoJSON= "geoJson.json";

open INXML, "$infile";
open OUTJSON, ">>$geoJSON";

while (<INXML>){
print "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx\n";
print "\$_ = $_\n";


};