[Mplayer-felhasznalok] stream néz+ment

[Peter Simon]

Hi!

Egy kicsit automatizálva:
------------

#!/usr/bin/perl

$SIG{KILL} = sub {wait};
socketpair (PARENT, CHILD, PF_UNIX, SOCKET_STREAM, 0);
if ($pid=fork()) {
	close PARENT;
	select CHILD;
	$|=1;
	select STDOUT;
} elsif (defined $pid) {
	open (STDIN, ">&PARENT");
	open (STDOUT, ">&PARENT");
	close PARENT;
	select STDOUT;
	$|=1;
	exec ('mplayer mms://fix.tv/fixdsl -dumpstream');
	exit;
}

sleep 5; # 5mp-et várunk a dump létrejöttéig
system('mplayer ./stream.dump');
`kill -9 $pid`;


-------------
VMiklos 2004. április 13. 13.47 dátummal ezt írta:
> kosz, ez bejott ;-)

Én is köszi!!! ;))

-- 
Sincerely

Péter Simon (Pepó)

GPRS Easy Connect team
simon.peter at linuxuser.hu
http://www.easyconnect.linuxuser.hu