ssokol
commented
2 years ago Got a bit further by fixing the issue with the stream count function. Apparently something has changed in the way mutool works. I was able to get the number of streams by revising the function as:
sub getNumberOfStreams {
#Get number of objects/streams in the targetpdf
my $_mutoolShowOutput = qx(mutool show $main::targetPdf trailer/Size);
if ($debug) {
say "mutools show output: " . $_mutoolShowOutput;
}
my $retval = $? >> 8;
die "No output from mutool show. Is it installed? Return code was $retval"
if ( $_mutoolShowOutput eq "" || $retval != 0 );
my $_objectstreams;
foreach my $line ( split /[\r\n]+/, $_mutoolShowOutput ) {
## Regular expression magic to grab what you want
if ($debug) {
say "Line: " . $line;
}
if ($line =~ /^(\d+)$/ ) {
$_objectstreams = $1;
}
if ( $line =~ /^(\d+)\s+(\d+)$/ ) {
$_objectstreams = $2;
}
}
if ($debug) {
say "Object streams: " . $_objectstreams;
}
return $_objectstreams;
}Once that was fixed, it was able to create the .vrt files. I'm not seeing where it updated the PDF with the corner information, but perhaps it never did that?
JanC
Hi Jesse,
Sorry to bother you with this, but my regex skills are almost nonexistent, my limited perl experience is 20 years out of date, and I seem to have run into a change in the format of the text in the airport diagram PDF documents that has broken the georeference system.
Both
findLatitudeTextBoxes2andfindLongitudeTextBoxes2are failing to find the required text. My assumption is that the FAA made some slight change in how it encodes the values which has broken the regexs that do the hard work here. I've included the debug output for one chart (it's for KGTU - Georgetown Municipal in Georgetown Texas). Any idea what need to be changed to find the text and the lines?Here are the lines that should work:
I'm not sure when the FAA changed things up - I'm just now starting to add charts and plates to my stuff. I greatly appreciate any pointers to get this working.
Best Regards,
Steve