0

最初の引数は、ビデオの URL にする必要があります。なぜこれが機能しないのか、誰かが私に指摘できますか?

perlとwgetがすでにインストールされているubuntu 12.04のこれらのec2インスタンスの1つを起動しました http://cloud-images.ubuntu.com/precise/current/

このスクリプトは、 https ://calomel.org/youtube_wget.html からのものです。

#!/usr/bin/perl

use strict;
use warnings;

## collect the URL from the command line argument
my $url = $ARGV[0] or die "\nError: You need to specify a YouTube URL\n\n";

## declare the user defined file name prefix 
my $prefix = defined($ARGV[1]) ? $ARGV[1] : "";

## download the html code from the youtube page
my $html = `wget -Ncq -e "convert-links=off" --keep-session-cookies --save-cookies /dev/null --no-check-certificate "$url" -O-`  or die  "\nThere was a problem downloading the HTML file.\n\n";

## collect the title of the page to use as the file name
my ($title) = $html =~ m/<title>(.+)<\/title>/si;
$title =~ s/[^\w\d]+/_/g;
$title =~ s/_Youtube_//ig;
$title =~ s/^_//ig;
$title = lc ($title);

## collect the URL of the video and translate to the proper URL
my ($download) = $html =~ /url_encoded_fmt_stream_map([\s\S]+?)fallback_host/ig;
$download =~ s/\\u0026/\&/g;
$download =~ s/^\=url%3D//g;
$download =~ s/%25/%/g;
$download =~ s/%3A/:/g;
$download =~ s/%2F/\//g;
$download =~ s/%3F/\?/g;
$download =~ s/%3D/\=/g;
$download =~ s/%252C/%2C/g;
$download =~ s/%26/\?/g;
$download =~ s/%253A/\:/g;

## print the file name of the video
print "\n     Download:   $prefix$title.webm\n\n";

## Download the file.
  my $error_code=system("wget -Ncq -e \"convert-links=off\" --load-cookies /dev/null --tries=50 --timeout=45 --no-check-certificate $download -O $prefix$title.webm &")>>8;

編集 perl スクリプトを実行した後、ビデオがダウンロードされません (サイズが 0 バイトです)

$ ./youtube_get_videos.pl http://www.youtube.com/watch?v=ejkm5uGoxs4

     Download:   radscorpion_youtube.webm

$ ls -lh
-rw-rw-r-- 1 ubuntu ubuntu    0 Sep 14 04:40 radscorpion_youtube.webm
4

2 に答える 2

1

&私はそれがあなたの命令の「ドナルドダック」、アンパサンドだと思いますsystem。プログラムが完了するのを待っていません。これにどれくらいの時間がかかるかはわかりませんが、瞬時にはなりません。あなたが（おそらく）得るエラーコード0は、ではなく、シェルsystemによって返されます（シェル&を呼び出します）wget。

于 2012-09-14T09:29:49.387 に答える
1

WWW::YouTube::Downloadという CPAN をお送りします。このモジュールをインストールしたら、バンドルされているyoutube-downloadユーティリティを使用するだけです。

stas@Stanislaws-MacBook-Pro:~$ youtube-download -o "{title}.{suffix}" http://www.youtube.com/watch?v=ejkm5uGoxs4 
--> Working on ejkm5uGoxs4
Downloading `RADSCORPION!.mp4`
26320989/26320989 (100.00%)
Download successful!
stas@Stanislaws-MacBook-Pro:~$ file RADSCORPION\!.mp4 
RADSCORPION!.mp4: ISO Media, MPEG v4 system, version 2
stas@Stanislaws-MacBook-Pro:~$

魅力のように機能します:)

于 2013-01-11T18:36:03.300 に答える