ctstream (diskuse)

[Aleš Kapica]

Bingo kluku. Takové hloubavce jako ty mám rád.

[Aleš Kapica]

Jinými slovy. Mě to (aktuálně) nefunguje

[dnes]

BEGIN failed--compilation aborted at ctstream-1 line 16

[petr_p]

To jistě není celá hláška. Co třeba něco o modulu JSON s patřičnou verzi?

[radun]

Sakra dobrá práce. Už jsem nedoufal, že bych mohl ještě někdy poslouchat ct24 jinak než přes prohlížeč.

[radun]

vyzkoušeno - funguje

[pek]

ctstream-1 http://www.ct24.cz/vysilani/ 500
Type of arg 1 to each must be hash (not array dereference) at /home/pek/bin/ctstream-1 line 54, near "$ref) "
Execution of /home/pek/bin/ctstream-1 aborted due to compilation errors.

JSON - 2.51
perl - 5.10.0

[Tomáš Pelc]

Taky mám stejnou chybu

[radun]

... Perl5 v. 12

[radun]

Nějak se mi to nepodařilo umístit ve vláknu tam kam jsem chtěl. Má to znamenat, že mám nainstalovanou v. 12 a stou mi to funguje. To jen, abych někoho nemát.

[radun]

Ja mam json 2.27. Na archu je to balík 'perl-json 2.27-1'.

[goliash]

Stejná chyba. Kubuntu 11.04. Pro úspěšné spuštění jsem musel doinstalovat libxml-perl, libjson-perl a libxml-xpath-perl.

[janick]

Po doinstalování balíků výše uvedených mi to hází tuto chybu:

janick@acer:~$ /home/janick/ctstream.sh /http://www.ct24.cz/ivysilani/
Type of arg 1 to each must be hash (not array dereference) at /home/janick/ctstream.sh line 54, near "$ref) "
Execution of /home/janick/ctstream.sh aborted due to compilation errors.

[goliash]

Jsem se asi nevyjádřil správně. Skript také "úspěšně" spustím (všechny moduly mám doinstalované, zkompiluje se správně), ale háže to stejnou chybu.

[petr_p]

Já mám perl-5.12.3. Teď jsem to vyzkoušel na perl-5.10.1 a tam to opravdu nefunguje, protože funkce each umí pracovat nad polem až od verze 5.12:

You can now use the "keys", "values", "each" builtin functions on arrays (previously you could only use them on hashes). See perlfunc for details. This is actually a change introduced in perl 5.12.0, but it was missed from that release's perldelta.

Něco s tím udělám. (Ach jo, a mně se ten polymorfismus tak líbil :(

[janick]

Mě při spuštění vzppíše toto: Can't locate JSON.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.10.1 /usr/local/share/perl/5.10.1 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 /usr/local/lib/site_perl .) at /home/janick/ctstream.sh line 16. BEGIN failed--compilation aborted at /home/janick/ctstream.sh line 16.

[Semo]

V stable Gentoo to chce dev-perl/XML-XPath a dev-perl/JSON.

[originalmike]

Hezke, dekuji za dobrou praci;)

Fedora 14 s baliky perl-XML-XPath a perl-JSON, funguje ok

[dnes]

Ve Fedoře kupodivu z placu funguje celá řada aplikací, které jinde bez dalšího babrání nejedou.

[chrono]

Funguje mi to s ČT24, u ČT4 jsou tomu předřazené reklamy, které ale přehrát nejdou. Stejný způsob by mohl fungovat i u jednotlivých pořadů, ale zatím jsem úspěch neměl (nenašel jsem stránku s patřičným iframem nebo mplayer si vylámal zuby (Received FLV packet before play()! Ignoring.)).

Na stránkach s programom je ten iframe vkladaný s parametrom autoStart=false, takže ak priamo načítaš ten iframe, nie je tam to, čo tam očakávaš. Najjednoduchšie riešenie je z url vymazať to &autoStart=false a potom tam už bude to, čo tam chceš mať (v perl sa vôbec nevyznám, ale mne fungovalo niečo ako $iframe_url =~ s/&autoStart=(?:false|true)//;).

Potom je už problém len to, že sa tam, kvôli znaku / vo video.src zle odvodí playpath, takže to tam musíš pridať ty. Pre ffplay (a mplayer) by to celé vyzeralo asi takto:

ffmpeg "$stream_url playpath=$suffix"

(a bonus je, že si tak prehráš aj tú ich reklamu :) )

[pavlix]

Nepokládám to za něco vyloženě nového, ale i tak díky za zadokumentování na Abclinuxu.

[Petr Tomášek]

1) díky, super věc

2) podporu pro ČT2 neplánuješ?