说明：  perl实现的一个爬虫程序，程序虽小，但是短小精干。可以使用正则表达式来限定爬行范围。
(achieve a reptile procedure is small, but small and lean. It is the use of regular expressions to limit the scope of crawling.)