Как скачать видео YouTube без какого-либо программного обеспечения или расширения?

Можно загружать видео на YouTube без расширений программного обеспечения, поскольку мы используем Ubuntu и, таким образом, имеем perl предустановлен и великий wget в нашем распоряжении. На сайте Calomel есть сценарий Perl , который я использую для этой цели, который извлекает путь к видеофайлу и передает этот путь в качестве параметра wget, Если у вас не установлен wget (я сомневаюсь, что у вас его нет), вы можете установить его из репозиториев. Как описано на сайте, вы просто запускаете скрипт с URL сайта, на котором размещено видео. Я знаю, что некоторым людям не нравится терминал (что печально), поэтому я написал для вас небольшой скрипт на perl. Но он зависит от библиотеки perl Tk, поэтому, если вы захотите его использовать, у вас будет установить perl-tk

---

#!/usr/bin/perl -w
#Script to collect input for calomels perl script to download youtube videos
use Tk;
my @LIST = ();
if (@ARGV) {
    @LIST = @ARGV;
    &downloadList();
    &endProg();
}
my $UserInput = undef;
my $infoText = 'This Script is dependant of wget and Tk';
our $testBlub = 0;

our $mw = MainWindow->new(-title => 'Youtube Downloader Beta');
$mw -> geometry("350x300");
$mw->Label(-text =>'Insert Youtube Link with Copy&Paste')->pack;
my $message = $mw->Entry(-width  => 50,-textvariable => \$UserInput);
$message->pack(-side=>'top');
my $Button1 = $mw->Button(-text => 'Add entry to list',-command => \&addList)->pack;
my $Button2 = $mw->Button(-text => 'Start Downloading',-command => \&downloadList)->pack;
my $exitButton = $mw->Button(-text => 'Exit',-command => \&endProg)->pack;
my $infoBoard = $mw->Label(-text => $infoText) ->pack;
our $ListBoard = $mw->Label(-text => $testBlub )->pack;
$mw ->update;


MainLoop;

sub addList {
    push(@LIST,$UserInput . "\n");
    $testBlub = $testBlub . $UserInput . "\n";
    $ListBoard -> configure(-text => $testBlub);
    $mw -> update;
}

sub downloadList {
    print "Event Download catched!\n";
    for my $test (@LIST) {
        print $test;
    }
    for my $Item (@LIST) {
        `./youtube_wget.pl $Item`;
        print "$Item is done\n";
    }
    @LIST = ();
}

sub endProg {
    exit(0);
}

Затем вы можете просто создать для него панель запуска, по которой можно щелкнуть, чтобы запустить скрипт. Ну, в любом случае, я надеюсь, что это поможет решить вашу проблему. Последнее, что я хотел бы сказать, приведенный выше код - не самое элегантное решение, он просто делает то, что должен.