使用Perl脚本自动提取保存网页中的数据