The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WWW::YouTube::Info - gain info on YouTube video by VIDEO_ID

SYNOPSIS

Perhaps a little code snippet?

  #!/usr/bin/perl
  
  use strict;
  use warnings;
  
  use WWW::YouTube::Info;
  
  # id taken from YouTube video URL
  my $id = 'foobar';
  
  my $yt = WWW::YouTube::Info->new($id);
  
  my $info = $yt->get_info();
  
  # hash reference holds values gained via https://youtube.com/get_video_info?video_id=foobar
  # $info->{title}          # e.g.: Foo+bar+-+%27Foobar%27
  # $info->{author}         # e.g.: foobar
  # $info->{keywords}       # e.g.: Foo%2Cbar%2CFoobar
  # $info->{length_seconds} # e.g.: 60
  # $info->{fmt_map}        # e.g.: 22%2F1280x720%2F9%2F0%2F115%2C35%2F854x480%2F9%2F0%2F115%2C34%2F640x360%2F9%2 ..
  # $info->{fmt_url_map}    # e.g.: 22%7Chttps%3A%2F%2Fv14.lscache1.c.youtube.com%2Fvideoplayback%3Fip%3D131.0.0. ..
  # $info->{fmt_stream_map} # e.g.: 22%7Chttps%3A%2F%2Fv14.lscache1.c.youtube.com%2Fvideoplayback%3Fip%3D131.0.0. ..
  # ..
  
  # Remark:
  # You might want to check $info->{status} before further workout,
  # as some videos have copyright issues indicated, for instance, by
  # $info->{status} ne 'ok'.

DESCRIPTION

I guess its pretty much self-explanatory ..

METHODS

get_info

See synopsis for how/what/why. You might also want to use Data::Dumper .. Croaks if LWP::Simple::get fails.

HINTS

Searching the internet regarding 'fmt_url_map' and/or 'get_video_info' might gain hints/information to improve WWW::YouTube::Info.

BUGS

Please report bugs and/or feature requests to bug-WWW-YouTube-Info at rt.cpan.org, alternatively by means of the web interface at https://rt.cpan.org/NoAuth/ReportBug.html?Queue=WWW-YouTube-Info.

AUTHOR

east <east@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) by east

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.0 or, at your option, any later version of Perl 5 you may have available.