use LWP::Simple;
use HTML::HeadParser;
use utf8;
binmode(STDOUT, ":encoding(gbk)"); #设置win下输出中文 $result = get('http://www.baidu.com');
$what = HTML::HeadParser->new;
$what->parse($result);
print $what->header('refresh'),"\n";
print $what->header('title'),"\n";
print $what->header('content_type'),"\n";

最新文章

  1. maven可选依赖(Optional Dependencies)和依赖排除(Dependency Exclusions)
  2. ETL的数据来源,处理,保存
  3. 使用wget备份禅道
  4. 【Windows核心编程】VirtualAlloc 例子
  5. 一天一个mysql函数(一) cast && convert
  6. (转)MVC 3 数据验证 Model Validation 详解
  7. Android 模拟登陆 保存密码(信息)到手机中 文件信息读取
  8. js 对url字符转译全解
  9. FastReport配置打印预览button_C++
  10. OR1200数据Cache介绍
  11. JSON和java对象的互转
  12. 数据库隔离级别(mysql+Spring)与性能分析
  13. java Base36 算法
  14. mui侧滑菜单"点击含有mui-action-menu类的控件"无法实现侧滑
  15. Python 面向对象(三)
  16. Docker容器的创建、启动、和停止
  17. Hibernate_HQL
  18. 关于Dubbo面试问题
  19. 爬虫--requests模块高级(代理和cookie操作)
  20. day2-作业及答案

热门文章

  1. java中多种方式读文件
  2. Linux面试题汇总答案(转)
  3. MySQL event调度
  4. Oracle数据库中心双活之道:ASM vs VPLEX
  5. [洛谷P3950]部落冲突
  6. Python type()函数用途及使用方法
  7. HDU4757:Tree——题解
  8. 实验五 TCP传输及加解密
  9. bzoj1057: [ZJOI2007]棋盘制作(悬线法)
  10. bzoj3524: [Poi2014]Couriers(主席树)