NAME
YouTube::Util - YouTube-related utilities
VERSION
This document describes version 0.003 of YouTube::Util (from Perl distribution YouTube-Util), released on 2020-11-26.
FUNCTIONS
extract_youtube_video_id
Usage:
extract_youtube_video_id($arg) -> any
Extract YouTube video ID from a string containing video ID, or youtube-dl-generated filename, or YouTube URL.
Examples:
Example #1:
extract_youtube_video_id("https://www.youtube.com/watch?v=rp4UwPZfRis"); # -> "rp4UwPZfRis"
Example #2:
extract_youtube_video_id("https://www.youtube.com/watch?v=cl1p7SOwnEk&list=PLjxOg4YY7Ah2JGb_QvA6KSB6YmikzA2fo&index=2&t=0s");
Result:
"cl1p7SOwnEk"
Example #3:
extract_youtube_video_id("https://www.youtube.com/watch?list=PLjxOg4YY7Ah2JGb_QvA6KSB6YmikzA2fo&v=cl1p7SOwnEk&index=2&t=0s");
Result:
"cl1p7SOwnEk"
Example #4:
extract_youtube_video_id("https://www.youtube.com/embed/U9v2S49sHeQ?rel=0"); # -> "U9v2S49sHeQ"
Example #5:
extract_youtube_video_id("https://youtu.be/U9v2S49sHeQ"); # -> "U9v2S49sHeQ"
Example #6:
extract_youtube_video_id("\$100,000 Name That Tune - Nick vs. Carol-SY-DnVZeFH0.mp4"); # -> "SY-DnVZeFH0"
Example #7:
extract_youtube_video_id("GNdALsnBjh8"); # -> "GNdALsnBjh8"
Example #8:
extract_youtube_video_id("foo"); # -> undef
Return undef if not found.
This function is not exported by default, but exportable.
Arguments ('*' denotes required arguments):
$arg* => str
Return value: (any)
HOMEPAGE
Please visit the project's homepage at https://metacpan.org/release/YouTube-Util.
SOURCE
Source repository is at https://github.com/perlancar/perl-YouTube-Util.
BUGS
Please report any bugs or feature requests on the bugtracker website https://rt.cpan.org/Public/Dist/Display.html?Name=YouTube-Util
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.
SEE ALSO
AUTHOR
perlancar <perlancar@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2020 by 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.