]]>
先讲讲做q个程序的动机吧，昨天看了?a title="哈工大Y件学院新d? target="_blank">以前学院的新?/a>Q没什么更斎ͼ但发现列表很长，保留?003q?月至今的所有新闅R?br />
q个新闻列表是大学期间我们了解学院信息的主要来源Q都L了每天先看新d?a title="哈工大丁香BBS" target="_blank">BBS的习惯。在大连实习期间更是如此Q也是产生感情了^__^Q所以。。。决定把q?00+新闻全部保存下来...
需求：指定一个网址Q将q个|页和里面所有的子链接页面都下蝲下来Q保存到指定的文件夹中?br />
如下图所C：
需求有了，怎么完成呢？?a target="_blank">q雷下蝲全部链接Q嗯Q这是个好主意，Q我实也这么做了一ơ，q接数开得太多了Q差点被orz Q，但咱们是搞Y件的@_@Q这个小功能是不是写个程序就能搞定，?a target="_blank">JavaQ想到那一堆Stream的封装（new BufferedReader(new BufferedOutputStream(new FileOutputStream(new File("blabla.html"))))Q?..我就头晕?br />
程序用脚本语言Q应该不错！
?a target="_blank">Perlq是PythonQ。。。经q一番网上查询论证，gQPerl语法复杂Q但l，API库也多；Python语法清晰易懂Q有点像JavaQ适合开发大型应用?br />
Java是我的最爱，也算熟悉了，学点bt的吧Q用Perl
完成代码期间主要参考了Perl文档中URLQHTML::LinkExtorQHTTP::Request的用法，Perl中国的一文?a target="_blank">《LWP与WEB的基本用?/a>Q还占用了J2EE的上课时间来~写E序。。?br />
1
#
2# Copyright (C) 2007 |明 <andyluo197(at)gmail.com>
3#
4
5
use
strict
"
vars
"
;
#
严格遵@my scope定义
6
7
use
LWP
::
Simple;
8
use
HTML
::
LinkExtor;
9
use
HTTP
::
Request
::
Common;
10
use
LWP
::
UserAgent;
11
use
URI
::
URL;
12
13
#
从命令行参数中取ȝ地址和保存文件夹
14
my
$url
=
$ARGV
[
0
];
15
my
$location
=
$ARGV
[
1
];
16
17
#
子程序，解析ȝ中的链接地址
18
my
@urls
=
();
19
sub
urlCallback
20{
21
my
(
$tag
,
%attr
)
=
@_
;
22
return
if
$tag
ne
'
a
'
;
23
push
(
@urls
,
values
%attr
);
24}
25
26
#
用于解析链接的LinkExtractor
27
my
$p
=
HTML
::
LinkExtor
->
new(
\&
urlCallback);
28
29
#
载入ȝ内容，及解析链接地址
30
my
$ua
=
LWP
::
UserAgent
->
new;
31
my
$res
=
$ua
->
request(HTTP
::
Request
->
new(GET
=>
$url
)
,
sub
{
$p
->
parse(
$_
[
0
])});
32
33
#
链接的相对路径转换为绝对\?/span>
34
my
$base
=
$res
->
base;
35
@urls
=
map
{
$_
=
url(
$_
,
$base
)
->
abs
}
@urls
;
36
37
#
网写入文?/span>
38
$ua
->
request(GET(
$url
)
,
$location
.
'
\\index.html
'
);
39
my
$index
=
1
;
40
foreach
(
@urls
)
41{
42
$ua
->
request(GET(
$_
)
,
$location
.
'
\\
'
.
$index
.
'
.html
'
);
43
$index
+=
1
;
44}
#
2
# Copyright (C) 2007 |明 <andyluo197(at)gmail.com>3
#
4
5
use
strict
"
vars
"
;
#
严格遵@my scope定义
6
7
use
LWP
::
Simple;8
use
HTML
::
LinkExtor;9
use
HTTP
::
Request
::
Common;10
use
LWP
::
UserAgent;11
use
URI
::
URL;12
13
#
从命令行参数中取ȝ地址和保存文件夹
14
my
$url
=
$ARGV
[
0
]; 15
my
$location
=
$ARGV
[
1
];16
17
#
子程序，解析ȝ中的链接地址
18
my
@urls
=
();19
sub
urlCallback20
{21
my
(
$tag
,
%attr
)
=
@_
;22
return
if
$tag
ne
'
a
'
;23
push
(
@urls
,
values
%attr
);24
}25
26
#
用于解析链接的LinkExtractor
27
my
$p
=
HTML
::
LinkExtor
->
new(
\&
urlCallback);28
29
#
载入ȝ内容，及解析链接地址
30
my
$ua
=
LWP
::
UserAgent
->
new;31
my
$res
=
$ua
->
request(HTTP
::
Request
->
new(GET
=>
$url
)
,
sub
{
$p
->
parse(
$_
[
0
])});32
33
#
链接的相对路径转换为绝对\?/span>
34
my
$base
=
$res
->
base;35
@urls
=
map
{
$_
=
url(
$_
,
$base
)
->
abs
}
@urls
;36
37
#
网写入文?/span>
38
$ua
->
request(GET(
$url
)
,
$location
.
'
\\index.html
'
);39
my
$index
=
1
;40
foreach
(
@urls
)41
{42
$ua
->
request(GET(
$_
)
,
$location
.
'
\\
'
.
$index
.
'
.html
'
);43
$index
+=
1
;44
}
ȝ保存ؓindex.htmlQ子|页???排序生成1.html?.html{?br />
因ؓ?a target="_blank">Google DesktopQ即使文件名?.html...Q搜索v来也是很方便的。也可以扩充下，?lt;a></a>中的新闻主题抽出来作为文件名。但q个E序Ҏ来说已经_了，所以就不l做了?br />
ȝ来说用Perlq是很简单的Q库也很多，写v来挺方便Q但是要记得常翻?a target="_blank">Perl手册Q呵?br />
Technorati Tag : Perl LWP Download web script
]]>
]]>
]]>
]]>
目前只知道在左栏可以列出所有文章，但不知道具体分页怎么做，莫非自己在页ֈ出各个页号及上下链接？
要是再加一个Google搜烦栏搜索整站内容就更好了，不过自己应该可以实现哦Qjust try!
]]>
[新华C]singlerly被双?BR> 1?日Man版消息。北京时?4点左右Man版传出消息，来自紫丁香的singlerly日前?nbsp;Man版被双规?nbsp; 当地官员发言指出Q该嫌疑犯是因ؓ煽动灌水而于当天14点左双捕的。目前正于押?nbsp;前往xiaoheiwu的途中?nbsp; 据当地群众称Q当地政府的权力混ؕ局面是singlerly同志遭到双规的主要原因。很多群众对singlerly的双重不q报以同情和慕?nbsp; 另有一位不愉K露姓名的权威h士指出，造成q种混ؕ局面的原因是由于相亲的处理问题Q现在值班站务jimu同学已基本控制了换q局面?nbsp; 新华CNMan版记者cc现场为您报道?nbsp;
Re感谢前方记者ؓ我们带来的现场报?nbsp;现在是广告时?nbsp;q告q后Ll关?/SPAN>Re下面l箋播报最新新? 丁香C֓滨1?日电Q记者八卦王子） 谈天聊地实习片长jimu日前表示Q目?区关Eh员关pLME_Q但斑竹和水?nbsp;和谐制度落实不到位、斑竹增长和调控机制不健全、R害灌水者合法权益等问题 仍然比较H出?nbsp; jimu表明在第十一个五q规划里借助攚w深入d战，要基本解x竹缺额问题?nbsp;他进一步提出，要针对当前的H出矛盾Q以建立和谐E_的灌水关pMؓȝQ以 l护最q大的关E者合法权益ؓ重点Q积极探索、创新校内BBS先进q_条g下和 谐灌水关pd理版面体制和机制?nbsp;Re本报?nbsp; 斑竹多id灌水是ؓ了反?nbsp;1??nbsp;紫丁香站长lanslot在听证会上被问及Q每个斑竹允许同时登?个帐P免费获取 上站旉和文章数Q这是ؓ了减ȝ丁香pȝ负担么？ lanslot_“众所周知Q目前国际恐怖势力猖獗，bbs又是恐怖分子的重点袭击对象Q所 以必d强bbs反恐力度Qbbs斑竹义不容辞地担负vbbs义务安全员的重要职责。?/SPAN>Rebbs 八卦报消息：关闭bbs是ؓ了刷水箱 5??nbsp;紫丁香全面关闭，据丁香ȝpopstarUͼ׃战友灌水q多Q导致丁香pȝ 水垢严重Q暂时关闭丁香3天，清除水垢。具体放水时间另行通知?nbsp;另有消息_本次关站与丁香上游水母厂爆炸有兟뀂水母厂技术站长接受本报记者采?nbsp;时称Q“爆炸只产生了二氧化_水”?nbsp;Re本报消息QfreenxiaoyuU有些斑竹的安全意识q普通用户都不如 针对q期bbs斑竹jjasonq箋发生因ؓ灌水Q言语粗鲁导致连l被版面，直至 发生被封全站的恶性事故。丁香关税安全部部长freexiaoyu怒斥jjasonQ“灌 水安全意识甚臌普通用户都不如。?/SPAN>Re紫丁报消息：国际C会UL谴责za论?nbsp;q日Q丁香z分子公然宣称“pielove版就是丁香的joke2”。针对这一a?nbsp;joke版斑竹迅速发表声明称Q“joke版坚持一个joke原则”“丁香只有一个joke?nbsp;“joke版的L和领土完整不容分剜y?nbsp;国际C会也迅速做出反应纷UC责，pielove版斑竹theendQ副斑竹dogcat也再 ơ重申了坚持“一个joke”政{。single, girl, man{版斑竹也纷UC“派?nbsp;分子是国际社会的ȝ刉者”?nbsp;Re本报讯： single版不存在灌水行ؓ?nbsp;single版斑竹rainbai在接受本报记者专访时Uͼ“single版从本质上说是属于丁香的， 属于所有站友的。single上水多就是对紫丁香，对站友利益的体现。我Mؓsingle版不?nbsp;在灌水行为?/SPAN>Re另讯Q黑土地是最自由民主的版?nbsp;黑土地版斑竹spacefightq日对媒体表C，黑土地是最自由民主的版面。针对pielove?nbsp;不断d黑土地版“封多，删脓严重Q压制言由”，spacefightUͼ“鹊桥版 版主在民主问题上双重标准Q除暴干涉别版内政；q日又爆出采用黑名单制度虐囚丑闻?nbsp;。“h权问题首先是生存权问题”。spacefightU“黑土地的民ȝ冉|最好的Q其?nbsp;版面都不怎么栗?/SPAN>Re: popstar: 关闭bbs是ؓ了刷水箱 《狗城晚报》的评论_g没有Q丁香Q网民愿意相信官方公布的关站原因。“如?nbsp;|民对站方的权威产生怀疑，无疑对事g的后l处理带来极大的隐患。?nbsp; 《西Ҏ报》的评论_“我们的x更在于对一套基本的公共危机应急机制的x。但 现在看来Q除了我们一再强调的信息公开、网民理性之外，在站方的基本应急协调机制方 面，我们的准备也q很不充分。?nbsp; 《北Ҏ报》的评论_“毫无疑问，H发事g考验着站方理公共事务的能力。经历了 前年的非典（萨斯Q之后，|民对‘谣a止于公开’可谓完全达成了p。?nbsp; ]]>
if you are using Linux, pls add yourself to this list on above site.
]]>
Ubuntu 团队免费l你邮寄 Ubuntu 光盘Q你可以用来安装或者分享给其他人?他们会承担这些光盘的货运费用?/P>
在此填写你的邮寄地址: http://shipit.ubuntulinux.org/
%e5%85%89%e7%9b%98&referrer=){kind=small}
]]>
使用Ubuntu Linux操作pȝ才有q个软g列表Q在软g包管理器里选择安装某个文档Q会自动下蝲到本圎ͼ然后可以阅MQ一般都是开源YӞ如Apache2、Emacs、VI、CVS、Subversion{）的资料?/p>
标准且全面，大多数文档有对应的中文版本，可以对照着看?br />
really crazy
现在d?52本书/文档
i don't have to find ebooks on web anymore, it's enough, also a good place to improve my English skills.
]]>
The JBoss TrailBlazer is a collection of interactive demos, runnable sample applications, technical articles, and other materials to help developers learn a new technology. These are part of JBoss's latest effort to make enterprise Java more easily accessible to everyone.
There are currently two EJB 3.0 related TrailBlazer applications. They are hosted on the latest JBoss AS 4.0.3 RC1, which comes with full EJB 3.0 support out-of-the-box, and is available for generic public over the Internet.
- The JBoss EJB 3.0 TrailBlazer focuses on the EJB 3.0 POJO programming model. It has 20 technical articles, more than a dozen live sample applications (with online source code), and several flash demonstrations. It covers almost all aspects of EJB 3.0 programming. Notable "trails" include:
- The JBoss IDE TrailBlazer has a series of flash demonstrations to show you how to develop, deploy, and debug a JBoss EJB 3.0 application from scratch using the IDE.
]]>