BBYR Achieve
返回信息流
这是一条镜像帖。来源:北邮人论坛 / linux / #24154同步于 2007/7/9
该镜像源已超过 30 天没有更新,可能在源站已被删除。
Linux机器人发帖

【原创】iptv.bupt.edu.cn一键式播放脚本【perl】

CNLAS
2007/7/9镜像同步2 回复
小学期真闲。。。=v=b 使用的前提还是需要打上补丁。。。不然mplayer不认中文编码的mms和rstp。。。听说最新的SVN版可以直接支持。。。 sunway发的mplayer 补丁 http://forum.byr.edu.cn/wForum/disparticle.php?boardName=Linux&ID=23943&pos=13 还有就是给初学者一点提醒: 1、mplayer的源码可以去官方网站下 http://www.mplayerhq.hu/design7/dload.html 2、说make不是简单的执行make语句。。。需要先configure一下 下面是参考。。。如果没有下到默认skin请把 --enable-gui去掉。。。 ./configure --prefix=/usr/local/mplayer --enable-gui --enable-freetype --with-codecsdir=/usr/lib/codecs/ --with-win32libdir=/usr/lib/win32/ --language=zh_CN_UTF8 3、configure然后make。。。之后还得执行make install安装。。。 4、安装完成之后还得给mplayer在/usr/bin/下建立一个符号链接。。。 ln -s /usr/local/mplayer/bin/mplayer /usr/bin/mplayer 加不加sudo那是基础。。。自己研究吧。。。 完成以上步骤就可以使用本脚本了。。。前提是装了perl了。。。=v=b 而且本脚本没有使用URL组件。。。不用装乱七八糟的库。。。默认的perl组件就可以了。。 如果有使用其他字符集的可以自己修改脚本中标注部分为自己本机的字符集。。。 使用方法有两种 一是直接执行./iptv.pl会列出当前iptv.bupt.edu.cn的所有可播放地址。。。 想看啥就输入前面的编号 二是直接用./iptv.pl 43 直接会打开编号43的地址播放。。。 恩。。。测试容错啥都没做。。。大家拿去玩吧。。。=v= 附件(775B) iptv.pl 恩。。。待会要是闲再用SHELL写一个好了。。。=v=b
订阅后,新回复会通过你的通知中心匿名送达。
2 条回复
CNLAS机器人#1 · 2007/7/9
源代码。。。 #!/usr/bin/perl -w #Usage: $0 no #Only for iptv.bupt.edu.cn #[BUPT]CNLAS 2007.07.09 use LWP::Simple; use Encode qw(decode encode); my $url_page='http://iptv.bupt.edu.cn'; my $doc=get($url_page); my $mplayer = "mplayer"; my $choice=$ARGV[0]; my $argc=@ARGV; if($argc > 1) { die("Uage:$0 no or $0\n"); } @url=($doc=~m/<a href="(.*?)" class=/isg); $end=$#url; foreach (0..$end) { $no=$_+1; $url[$_] = decode("GB2312", $url[$_]); $url[$_] = encode("utf8", $url[$_]); #UTF8改成你要的编码 if($argc != 1){print "$no $url[$_] \n";}; } print "Which Channel:"; if ($argc != 1) { chomp($choice=<STDIN>); } $choice--; if (defined($url[$choice])) { exec($mplayer, $url[$choice]) or die "something wrong!"; } else { die("something wrong!"); }
sunway机器人#2 · 2007/7/9
#!/bin/sh WORD="CCTV-1 CCTV-2 CCTV-3 CCTV-4 CCTV-5 CCTV-6 CCTV-7 CCTV-8 CCTV-9 CCTV-10 CCTV-11 CCTV-12 CCTV-新闻 CCTV-音乐 CCTV-少儿 央视高清 凤凰-电影 凤凰-中文 凤凰-资讯 星空卫视 华娱卫视 Channel-V 东风卫视 湖南卫视 BTV-1 BTV-2 BTV-3 BTV-4 BTV-5 BTV-6 BTV-7 BTV-8 BTV-9 BTV-10 TVB8 CNA BBC CNN ESPN 亚洲财经报道" select i in $WORD ; do mplayer mms://211.68.71.222/$i done 【 在 CNLAS (Ich gewinne bestimmt……) 的大作中提到: 】 : 小学期真闲。。。=v=b : 使用的前提还是需要打上补丁。。。不然mplayer不认中文编码的mms和rstp。。。听说最新的SVN版可以直接支持。。。 : sunway发的mplayer 补丁 : ...................