NAME

File::Extension - explain file extensions

SYNOPSIS

      use File::Extension qw(extplain);

      my @filetypes = qw(nes pl pm gb p6);

      for my $what(@filetypes) {
        printf("%s is a %s\n", $what, extplain($what));
      }

DESCRIPTION

File::Extension exposes functionality for getting information on filetypes based solely on their file extension.

This is useful in cases where libmagic doesn't work, i.e on empty or corrupted files.

The extensions and descriptions are taken from http://fileinfo.com.

EXPORTS

None by default.

FUNCTIONS

extplain()

Parameters: $file_extension

Returns: $explanation

  my $explanation = extplain('nes'); # Nintendo (NES) ROM File

HISTORY

This module was initially crafted while exploring ideas for generating the world's largest LS_COLORS file:

"https://github.com/trapd00r/LS_COLORS/issues/112"

SEE ALSO

https://github.com/trapd00r/LS_COLORS

AUTHOR

  Magnus Woldrich
  CPAN ID: WOLDRICH
  m@japh.se
  http://japh.se

CONTRIBUTORS

None required yet.

COPYRIGHT

Copyright 2018 the File::Extensions "AUTHOR" and "CONTRIBUTORS" as listed above.

LICENSE

This library is free software; you may redistribute it and/or modify it under the same terms as Perl itself.