作者LiloHuang (相见不如怀念)
看板Programming
标题Re: [问题] 请教一个网路程式
时间Mon Aug 6 14:23:54 2007
已经前面base.js中的的网址之後...这样就能喷出网址了
#!/usr/bin/perl
use LWP::Simple;
$_= get '
http://mtv123.com/mtv123play.php?id=98212';
print "
http://58.218.179.137/b1qsqb$1" if(/\Qbaseurls + "\E([^"]+)\"/);
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.230.160.177
1F:→ LiloHuang:已经知道前面...少打"知道"两个字 61.230.160.177 08/06 14:27