=encoding utf8

=head1 NAME

Geo::Format::Landsat::MTL - read landsat meta data from MTL file

=head1 INHERITANCE

 Geo::Format::Landsat::MTL
   is a Exporter

=head1 SYNOPSIS

 my ($type, $data) = landsat_mtl_from_file $filename;

 # study the result.
 use Data::Dumper;
 warn Dumper $data;

 print $data->{METADATA_FILE_INFO}{ORIGIN}, "\n";

 my $data = landsat_meta_from_filename $filename;
 print $data->{WRS_PATH};

=head1 DESCRIPTION

Process the content of a MTL file, as specified by document
C<level1_dfcb_rev5_401.pdf>.
See also F<http://landsathandbook.gsfc.nasa.gov/handbook/handbook_toc.html>

=head1 FUNCTIONS

=over 4

=item B<landsat_meta_from_filename>(FILENAME)

Returns information from the filename, like the PRODUCT_METADATA
structured from the MTL record, but without opening the file.

=item B<landsat_mtl_from_file>(FILE)

Read one Vgroup record from the FILE, specified by name or filehandle.

Returned is a pair: the name of the record (for instance, C<L1_METADATA_FILE>)
and the destructed content.  Each nested group is represented by a nested
HASH.

The HASHes contain keys in capitals, which are exactly the fields as
found in the meta-data file.  Additionally, a number of lower-cased
keys are added (the lower cased versions of some upper-cased names)
with smart processed information.

=back

=head1 SEE ALSO

This module is part of Geo-Format-Landsat distribution version 0.90,
built on January 23, 2018. Website: F<http://perl.overmeer.net/CPAN/>

=head1 LICENSE

Copyrights 2009-2018 by [Mark Overmeer]. For other contributors see ChangeLog.

This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
See F<http://dev.perl.org/licenses/>