D
for "urls.txt".IO.lines -> $url {
run 'youtube-dl', $url;
}Size: a a a
2021 March 20
VK
доработал для загрузки урлов с файла urls.txt
sub MAIN($urls = 'urls.txt') {
for $urls.IO.lines -> $url {
run 'youtube-dl', $url;
}
}Можно запускать так:
$ raku download.raku # по-умолчанию берет urls.txt
$ raku download.raku some-urls.txt # берет переданный файл
D
sub MAIN($urls = 'urls.txt') {
for $urls.IO.lines -> $url {
run 'youtube-dl', $url;
}
}Можно запускать так:
$ raku download.raku # по-умолчанию берет urls.txt
$ raku download.raku some-urls.txt # берет переданный файл
Слава, ну отлично же. Теперь можно оформлять как пакет. И закладывать в репозиторий.
D
sub MAIN($urls = 'urls.txt') {
for $urls.IO.lines -> $url {
run 'youtube-dl', $url;
}
}Можно запускать так:
$ raku download.raku # по-умолчанию берет urls.txt
$ raku download.raku some-urls.txt # берет переданный файл
Какой пакетный менеджер в Raku?
VK
можешь для любой ОС загрузить https://rakudo.org/downloads
VK
даже для JS)
VK
и JVM
VK
обычно такое практикуется в JS-сообществе - на каждую функцию свой пакет)
VK
скорее на github/bitbucket
VK
для опыта
VK
D
вот гениальный JS-пакет is-prime-value
https://github.com/akshaypatil1/is-prime-value/blob/main/index.js#L21 это да, действительно "гениальный".
2021 March 21
V
а сейчас и Raku есть - еще круче
Написал скрипт для скачивания видео
download.raku
Написал скрипт для скачивания видео
download.raku
my $base_url = 'https://www.youtube.com/watch?v=';
my @hashes =
'dQjUH0kTq8w', # Администрирование Linux. Лекция 1
'cbo0HVW2ydw', # Администрирование Linux. Лекция 2
'8biIIJk70k8', # Администрирование Linux. Лекция 3
;
for @hashes -> $hash {
run 'youtube-dl', sprintf("%s%s", $base_url, $hash);
}
$ raku download.rakuRaku, ранее Perl 6 Классно замаскировали.