当前时区为 UTC + 8 小时



发表新帖 回复这个主题  [ 44 篇帖子 ]  前往页数 上一页  1, 2, 3  下一页
作者 内容
16 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-09-23 17:15 

注册: 2008-09-30 17:46
帖子: 1967
送出感谢: 29
接收感谢: 4
xiooli 写道:
晕哦,都没人顶,没意思。。。 :em20

:em66 :em66 :em66


页首
 用户资料  
 
17 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-09-23 17:26 
头像

注册: 2009-04-06 15:03
帖子: 640
送出感谢: 1
接收感谢: 0 次
:em11


_________________
,


页首
 用户资料  
 
18 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-09-23 17:58 

注册: 2005-10-04 19:38
帖子: 117
送出感谢: 0 次
接收感谢: 0 次
强,顶!


页首
 用户资料  
 
19 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-09-26 10:18 
头像

注册: 2008-03-27 17:21
帖子: 206
送出感谢: 0 次
接收感谢: 0 次
./booksearch.sh: line 9: uni2ascii:找不到命令
sort: 多字符标签 “¥”
./booksearch.sh: line 35: uni2ascii:找不到命令
./booksearch.sh: line 40: %12: 语法出错:此处需要运算符 (error token is "%12")
:em09
先:sudo apt-get install uni2ascii
然后在执行。
:em20
sort: 多字符标签 “¥”
不管如何,先顶再说!、
弱弱的问一句,sort的错误怎么回事?


页首
 用户资料  
 
20 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-09-26 11:19 
头像

注册: 2007-11-19 21:51
帖子: 6956
地址: 成都
送出感谢: 0 次
接收感谢: 4
charleskao 写道:
./booksearch.sh: line 9: uni2ascii:找不到命令
sort: 多字符标签 “¥”
./booksearch.sh: line 35: uni2ascii:找不到命令
./booksearch.sh: line 40: %12: 语法出错:此处需要运算符 (error token is "%12")
:em09
先:sudo apt-get install uni2ascii
然后在执行。
:em20
sort: 多字符标签 “¥”
不管如何,先顶再说!、
弱弱的问一句,sort的错误怎么回事?

可能是 ubuntu 上面 sort 的问题,arch 上无此错误。


页首
 用户资料  
 
21 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-09-27 17:37 

注册: 2009-02-23 18:59
帖子: 6
送出感谢: 0 次
接收感谢: 0 次
将¥ 换成其他的符号,运行正常,否则和楼上的一样:sort: 多字符标签 “¥”


页首
 用户资料  
 
22 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-01 16:02 
头像

注册: 2007-05-26 20:57
帖子: 113
送出感谢: 0 次
接收感谢: 0 次
:em11 mark


页首
 用户资料  
 
23 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-03 13:13 
头像

注册: 2009-06-21 19:38
帖子: 210
地址: CUMT
送出感谢: 0 次
接收感谢: 0 次
有点意思! :em09


_________________
代码:
sudo apt-get install girlfriend
正在读取软件包列表... 完成
正在分析软件包的依赖关系树... 完成
有一些软件包无法被安装。
下列的信息可能会对解决问题有所帮助:
下列的软件包有不能满足的依赖关系:
girlfriend: 依赖: house但是它将不会被安装
girlfriend: 依赖: car但是它将不会被安装
house,car: 依赖: money但是它将不会被安装
E: 无法安装的软件包


页首
 用户资料  
 
24 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-15 9:54 
头像

注册: 2007-05-31 20:17
帖子: 207
地址: DUT
送出感谢: 0 次
接收感谢: 0 次
顶顶,挺不错


_________________
I can do if I try!!!


页首
 用户资料  
 
25 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-18 21:54 
头像

注册: 2007-12-20 15:08
帖子: 231
地址: harbin
送出感谢: 0 次
接收感谢: 0 次
呵呵,很久没来了,发现还有这个任务蛮有意思的,正好复习一下perl,下面是我的代码,大家轻拍噢,只实现了dangdang上的信息爬取。在此感谢xiooli 童鞋的代码,在编程的过程中给了很多的参考价值。

大家多多交流哈..
代码:
#!/usr/bin/perl -W
#=========get the books info from dangdang.com
#=========by keky, hitkeky[AT]gmail[DOT]com=========
#=========Usage: ./thisfile BOOKNAME=========
#=========Test Environment's encoding is utf8
#=========modules reserved: LWP Text::Iconv==
use strict;
use LWP;
use Text::Iconv;
my $key = $ARGV[0];
my $g2u = Text::Iconv->new('cp936','utf8'); ##ENCODING CONVERTER l change from  cp936 2 utf8
my $u2g = Text::Iconv->new('utf8','gb2312');##ENCODING CONVERTER l change from   utf8 2 gb2312
$key  = $u2g->convert($key);
my $agent = LWP::UserAgent->new();
my $pages = &getMaxPage;
die "There is no result for your query!Please try again" unless $pages != -1; #there is no result
for( my $i = 1; $i <= $pages; ++$i)###print info for pages
{
   my $pageInfo = &getPages( $i );
   &printInfo( $pageInfo );
}
#####*************functions******################
sub removePoint{#remove the marks unusefull
   my   $tp = $_[0];
   $tp =~ s/\<.*?\>//g;
   return $tp;
}
sub printInfo{ #print the information needed
   $_ = $_[0];
   while( 1 ){
      if( $_ =~ m/\<a.*pub_name.*/ ) #match the books
      {
         $_ = $'; #get the remained info
         my $bookName = &removePoint( $& );#get bookName
         print $bookName."\n";
        if( $_ =~ m/\<h6\>.*\<\/h6\>/){ #match the prices of the books
           $_ = $';
           my $price = $&;
           $price = &removePoint( $& );
           print $price."\n";
        }
      }
      else {
         last;
      }
   }
}
sub getPages{
   my $num = $_[0];
   my $url = 'http://search.dangdang.com/book/search_pub.php?key='.$key.'&page='.$num.'&category=01';
   my $response = $agent->get( $url );
   #my $response = $agent->request( $request );
   $response->is_success or  die "$url: ".$response->message."\n";
   my $tmp = $g2u->convert( $response->content);
   return $tmp;
}
sub getMaxPage{ #get the pages' number
   my $tmp = &getPages( 1 );
   if( $tmp =~ m/maxPage=(\d+)/){
      print "you are right!";
      print "maxPage=:".$1."\n";
      return $1;
   }
   return -1;
}


_________________
Keep trying...never say never. blog: H。U。C
代码:
        .--.
       |o_o |
       |:_/ |           < Hello Girl >
      //   \ \             ------------
     (|     | )
    /'\_   _/`\
    \___)=(___/


页首
 用户资料  
 
26 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-23 14:08 
头像

注册: 2008-04-09 11:01
帖子: 153
送出感谢: 0 次
接收感谢: 0 次
mark一下!


页首
 用户资料  
 
27 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-23 14:09 
头像

注册: 2008-04-07 17:36
帖子: 4010
地址: 泰安人在阜新
送出感谢: 0 次
接收感谢: 0 次
mark下


_________________
宇宙数学物理 sssssssss Ubuntu 桌面培训 sssssssss 问打包的问题之前先看
和我一样的新手请看,我看过了,腰不酸了,腿不疼了,上楼也有劲了
想去IRC的点这里——一个比QQ群好N多的东西


页首
 用户资料  
 
28 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-24 18:48 

注册: 2009-03-17 12:37
帖子: 1
送出感谢: 0 次
接收感谢: 0 次
费劲 google购物就很不错


页首
 用户资料  
 
29 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-27 17:15 

注册: 2006-12-14 15:12
帖子: 31
送出感谢: 0 次
接收感谢: 0 次
:em20

有才
很有才


页首
 用户资料  
 
30 楼 
 文章标题 : Re: [四星]写一个脚本,自动找到相关图书和价格
帖子发表于 : 2009-10-29 9:43 

注册: 2007-09-20 13:34
帖子: 117
地址: 重庆
送出感谢: 0 次
接收感谢: 0 次
bash菜鸟来摸8高手的。。 :em11 :em11


页首
 用户资料  
 
显示帖子 :  排序  
发表新帖 回复这个主题  [ 44 篇帖子 ]  前往页数 上一页  1, 2, 3  下一页

当前时区为 UTC + 8 小时


在线用户

正在浏览此版面的用户:没有注册用户 和 4 位游客


不能 在这个版面发表主题
不能 在这个版面回复主题
不能 在这个版面编辑帖子
不能 在这个版面删除帖子
不能 在这个版面提交附件

前往 :  
本站点为公益性站点,用于推广开源自由软件,由 DiaHosting VPSBudgetVM VPS 提供服务。
我们认为:软件应可免费取得,软件工具在各种语言环境下皆可使用,且不会有任何功能上的差异;
人们应有定制和修改软件的自由,且方式不受限制,只要他们自认为合适。

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
简体中文语系由 王笑宇 翻译