Виц: известният бай Иван

Началникът на едно предприятие отишъл при подчинения си Бай Иван и му казал:
- Бай Иване, другата седмица ще идва на посещение президента Плевнелиев, искам всичко да е на ред.

Бай Иван го уверил, че всичко ще бъде както трябва и няма да има проблеми. Така и станало. Президентът пристигнал и като видял Бай Иван още от портала се запрегръщали - станало ясно, че са приятели. Сложили големите софри - ядене пиене, минала срещата...

След месец началника отива по същия повод при Бай Иван със заръката всичко да бъде както трябва, ще идва на посещение президентът на Русия - не може да допуснат да се изложат. Срещата протича по същия начин, Путин се оказва в много добри приятелски отношения с Бай Иван, отново големите софри - всичко минало безпроблемно.

След още два месеца, началника пак отива при Бай Иван и му казва:
- Бай Иване, много допринесе за това предприятие, много помогнаха приятелските ти отношения с тези влиятелни хора, като възнаграждение искам да дойдеш с мен във Ватикана - за литургията на Папата.

Така и станало - отишли на литургията, а там много народ. Бай Иван и началника му застанали в центъра на тълпата и литургията започнала.
По едно време Папата казал по микрофона:
- Бай Иване, ти тук ли си бил? Ела при мен горе.

Отишъл Бай Иван, литургията свършила, а когато се върнал началника му бил припаднал и се опитвали с вода и шамари да го свестят. Когато дошъл на себе си Бай Иван го попитал:
- Началник, какво ти стана, защо припадна?
А началника отговорил:
- Добре... че си приятел с Плевнелиев го приех, че сте близки с Путин пак го преживях, че Папата те познава - как да е; но не можах да издържа когато един японски журналист дойде при мен, посочи към трибуната и попита:
- Абе, кой е оня там горе до Бай Иван?

Как да си свалим видео от youtube с помощта на perl script

Днес си харесах една песничка и исках да си я сваля на телефона.

Обикновено използвам download video helper, но той сваля клипа с минимално качество, а освен това се оказа, че иска да си регистриран за да можеш да извадиш само звука от даден клип.

На първа страница на Google ми излезе едно много готино perl скриптче което искам да споделя с вас.

Съхранявате кода като youtube_get_video.pl на вашата линукс система и го изпълнявате с един аргумент - линк към клипа в youtube.

Пример:

• ./youtube_get_video.pl "http://www.youtube.com/watch?v=TwH2VU7Vqss"

Това ще ви свали видеото в най-добрият формат който е available - в моя случай е 1080p и размера е около ~135Мб.

Ако искате да извадите само аудиото ще ви трябва ffmpeg/avconv:

• ffmpeg -i poli_genova_na_inat_bulgaria_.webm -vn -ab 128 poli_genova_na_inat_bulgaria_ .mp3
• ffmpeg -i poli_genova_na_inat_bulgaria_.webm -vn -ab 128 poli_genova_na_inat_bulgaria_ .ogg
• ffmpeg -i poli_genova_na_inat_bulgaria_.webm -vn -ab 320 poli_genova_na_inat_bulgaria_ .mp3

Ето го кода:
#!/usr/bin/perl use strict; use warnings; # ## Calomel.org ,:, Download Youtube videos and music using wget ## Script Name : youtube_get_video.pl ## Version : 0.30 ## Valid from : December 2012 ## URL Page : https://calomel.org/youtube_wget.html ## OS Support : Linux, Mac OSX, OpenBSD, FreeBSD or any system with perl # `:` ## Two arguments ## $1 Youtube URL from the browser ## $2 prefix to the file name of the video (optional) # ## 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 my ($download) = $html =~ /"url_encoded_fmt_stream_map"([\s\S]+?)\,/ig; ## clean up the url by translating unicode and removing unwanted strings $download =~ s/\:\ \"//; $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/sig=/signature=/g; $download =~ s/\\u0026/\&/g; $download =~ s/(type=[^&]+)//g; $download =~ s/(fallback_host=[^&]+)//g; $download =~ s/(quality=[^&]+)//g; ## collect the url and signature since the html page randomizes the order my ($signature) = $download =~ /(signature=[^&]+)/; my ($youtubeurl) = $download =~ /(http.+)/; $youtubeurl =~ s/&signature.+$//; ## combine the url and signature in order to use in wget $download = "$youtubeurl\&$signature"; ## a bit more cleanup $download =~ s/&+/&/g; $download =~ s/&itag=\d+&signature=/&signature=/g; ## print the file name of the video collected from the web page title for us to see on the cli print "\n Download: $prefix$title.webm\n\n"; ## Download the file using wget and background the wget process print "wget -Nc -e \"convert-links=off\" --load-cookies /dev/null --tries=50 --timeout=45 --no-check-certificate \"$download\" -O $prefix$title.webm\n"; system("wget -Nc -e \"convert-links=off\" --load-cookies /dev/null --tries=50 --timeout=45 --no-check-certificate \"$download\" -O $prefix$title.webm"); print "\n To extract the audio use the following command:\n"; print "\n avconv -i $prefix$title.webm -vn -ab 192000 $prefix$title.mp3\n" #### EOF #####

Използвана е информация от https://calomel.org/youtube_wget.html.

Shit! We're dealing with a sysadmin!

Shit, we're dealing with a sysadmin!

Source: Megalan

Industrial complex vs Nature

Chess play: people vs. enviroment; Author unknown

"A society is defined not only by what it creates, but by what it refuses to destroy."

John Sawhill