ctstream (diskuse)

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

Slackware

11.5.2011 09:36 Tomáš Pelc | skóre: 22 | blog: multimedialni_pc_k_LCD_TV
Rozbalit Rozbalit vše Re: ctstream

Taky mám stejnou chybu :-(

11.5.2011 09:45 radun
Rozbalit Rozbalit vše Re: ctstream

... Perl5 v. 12

11.5.2011 10:01 radun
Rozbalit Rozbalit vše Re: ctstream

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.

11.5.2011 09:43 radun
Rozbalit Rozbalit vše Re: ctstream

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

11.5.2011 09:43 goliash | skóre: 12 | Ostrava
Rozbalit Rozbalit vše Re: ctstream

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

11.5.2011 09:58 janick | Moutnice
Rozbalit Rozbalit vše Re: ctstream

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.

Obyčejný člověk si myslí, že jeden kilobyte má 1000 bytů a programátor si myslí, že jeden kilometr má 1024 metrů.

11.5.2011 10:02 goliash | skóre: 12 | Ostrava
Rozbalit Rozbalit vše Re: ctstream

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.

11.5.2011 10:35 petr_p | skóre: 59 | blog: pb
Rozbalit Rozbalit vše Re: ctstream

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 :(

Hezke, dekuji za dobrou praci;)

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

Follow me if I advance. Kill me if I retreat. Avenge me if I die. Warmaster Solon

11.5.2011 15:13 dnes
Rozbalit Rozbalit vše Re: ctstream

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

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 :) )