NAME Filename::Video - Check whether filename indicates being a video file VERSION This document describes version 0.005 of Filename::Video (from Perl distribution Filename-Video), released on 2024-01-12. SYNOPSIS use Filename::Video qw(check_video_filename); my $res = check_video_filename(filename => "foo.mp3"); if ($res) { printf "File is video"; } else { print "File is not video\n"; } DESCRIPTION FUNCTIONS check_video_filename Usage: check_video_filename(%args) -> bool|hash Check whether filename indicates being a video file. Examples: * Example #1: check_video_filename(filename => "foo.txt"); # -> 0 * Example #2: check_video_filename(filename => "foo.DOC"); # -> 0 * Example #3: check_video_filename(filename => "foo.webm"); # -> { filename_without_suffix => "foo", suffix => "webm" } * Example #4: check_video_filename(filename => "foo.MP4"); # -> { filename_without_suffix => "foo", suffix => "MP4" } This function is not exported by default, but exportable. Arguments ('*' denotes required arguments): * filename* => *filename* (No description) Return value: (bool|hash) Return false if no archive suffixes detected. Otherwise return a hash of information. HOMEPAGE Please visit the project's homepage at <https://metacpan.org/release/Filename-Video>. SOURCE Source repository is at <https://github.com/perlancar/perl-Filename-Video>. SEE ALSO Filename::Audio Filename::Image Filename::Ebook Filename::Media 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) 2024, 2020, 2017 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-Video> 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.