/ 
Filename-Media-Info-0.002
/ Filename::Media::Info

NAME

Filename::Media::Info - Extract various information from media filenames

VERSION

This document describes version 0.002 of Filename::Media::Info (from Perl distribution Filename-Media-Info), released on 2025-08-23.

SYNOPSIS

use Filename::Media::Info qw(parse_media_filename);
my $res = parse_media_filename(filename => "IMG_20141103_122548680_HDR.jpg");

DESCRIPTION

FUNCTIONS

parse_media_filename

Usage:

parse_media_filename(%args) -> hash

Extract various information from media filenames.

Examples:

  • Example #1:

    parse_media_filename(filename => "IMG-20140828-WA0002.jpg");

    Result:

    {
  epoch => 1409158800,
  filename => "IMG-20140828-WA0002.jpg",
  hms => "000000",
  is_whatsapp => 1,
  type => "image",
  ymd => 20140828,
}

  • Example #2:

    parse_media_filename(filename => "IMG_20141103_122548680_HDR.jpg");

    Result:

    {
  epoch => 1414992348,
  filename => "IMG_20141103_122548680_HDR.jpg",
  hms => 122548,
  millisecond => 680,
  type => "image",
  ymd => 20141103,
}

This function is not exported by default, but exportable.

Arguments ('*' denotes required arguments):

  • filename* => filename

    (No description)

Return value: (hash)

HOMEPAGE

Please visit the project's homepage at https://metacpan.org/release/Filename-Media-Info.

SOURCE

Source repository is at https://github.com/perlancar/perl-Filename-Media-Info.

SEE ALSO

Filename::Type::*.

Media::Info

AUTHOR

perlancar <perlancar@cpan.org>

CONTRIBUTING

To contribute, you can send patches by email/via RT, or send pull requests on GitHub.

Most of the time, you don't need to build the distribution yourself. You can simply modify the code, then test via:

% prove -l

If you want to build the distribution (e.g. to try to install it locally on your system), you can install Dist::Zilla, Dist::Zilla::PluginBundle::Author::PERLANCAR, Pod::Weaver::PluginBundle::Author::PERLANCAR, and sometimes one or two other Dist::Zilla- and/or Pod::Weaver plugins. Any additional steps required beyond that are considered a bug and can be reported to me.

COPYRIGHT AND LICENSE

This software is copyright (c) 2025 by perlancar <perlancar@cpan.org>.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

BUGS

Please report any bugs or feature requests on the bugtracker website https://rt.cpan.org/Public/Dist/Display.html?Name=Filename-Media-Info

When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.