perl - 在 perl 中使用 WWW::YouTube::Download 时出错

Question

我安装了WWW::YouTube::Download用于下载 youtube 视频的模块并使用以下代码实现它

#!C:\strawberry\perl\bin\perl.exe
use strict;
use warnings;
use WWW::YouTube::Download;

my $video_id="http://www.youtube.com/watch?feature=player_detailpage&list=TLNsL47LmBlyoKYinLLPSOkS7jlnl2V6u_&v=hzrGAZnMOMQ";
my $client = WWW::YouTube::Download->new;
$client->download($video_id);

my $video_url = $client->get_video_url($video_id);
my $title     = $client->get_title($video_id);     # maybe encoded utf8 string.
my $fmt       = $client->get_fmt($video_id);       # maybe highest quality.
my $suffix    = $client->get_suffix($video_id);    # maybe highest quality file suffix 

显示以下错误

JSON对象之后的垃圾，在第226行的C:/strawberry/perl/site/lib/www/YouTube/Download.pm的字符偏移量25151(在“;(function(){var en ...”之前)之前)

如何修复错误？

Answer 1

$video_id download 的参数应该只是 hzrGAZnMOMQ ，而不是完整的视频 URI。