当前时区为 UTC + 8 小时



发表新帖 回复这个主题  [ 17 篇帖子 ]  前往页数 1, 2  下一页
作者 内容
1 楼 
 文章标题 : 抛砖引玉--万用查询脚本
帖子发表于 : 2008-10-01 14:23 
头像

注册: 2005-10-04 10:59
帖子: 1928
地址: 上海
送出感谢: 0 次
接收感谢: 1
这个脚本,是我用来查IP,手机归属地,单词,以及打开选中的url的。使用的时候用鼠标选中要查的内容,按一个快捷键调用就行了(我把它绑给了thinkpad的ACCESS IBM键)。效果见附件。
需要装的软件有python(废话),libnotify,sdcv,espeak(可以改用festival),xsel(可以改用xclip)。

希望能够抛砖引玉,看看大家有没有什么更好的点子。

代码:
#!/usr/bin/env python
# -*- coding: UTF-8 -*-
#Author: Roy L Zuo (roylzuo at gmail dot come)
#Last Change: Sat Sep 27 07:30:22 2008 EST
#Description: various actions to perform on selected text

import os, re, urllib, urllib2, sys

string = (sys.argv[1] if len(sys.argv)==2 else (os.popen('xsel -o').read().strip()))

notifyargs = "notify-send -t 5000 -i ~/.icons/png-1009.png"
#notifyargs = "notify-send -t 5000 -i ~/.icons/hamster_128.png"
if string.isalpha():
    #单词翻译
    translation = os.popen('sdcv -n "%s"' %string).read()
    pos = translation.find("-->%s\n" %string)
    if pos != -1:
        translation = translation[pos+len(string)+3:]
        os.system('%s "Meoww~~, %s的意思是:" "%s"' %(notifyargs, string,translation) )
        os.system('espeak %s' %string)
    else:
        text = '<span size="20000" color="brown" weight="bold">%s</span>' \
            %('\n\n  '+ '没有查到%s这个词' %string )
        os.system("%s 'Meoww~~, 很抱歉:' '%s'" %(notifyargs, text) )
elif re.match("^(\d{1,3}\.){3}\d{1,3}$", string):
    #ip查询
    eform = urllib.urlencode({"ip":string, "action":2})
    request = urllib2.Request("http://www.ip138.com/ips.asp", eform)
    page = urllib2.urlopen(request).read()
    address = page.decode("gb2312").encode("utf8")
    address = re.search('本站主数据:(.*?)</li', address, re.DOTALL).group(1)
    text = '<span size="24000" color="red" weight="bold">%s</span>' \
            %('\n'+ address.replace(" ", "\n\n\t") )
    os.system("%s 'Meoww~~,%s地址在:' '%s'" %(notifyargs,string,text) )
elif re.match("^1(\d){10}$", string):
    #手机号归属地与运营商查询
    data = urllib.urlencode({"mobile": string, "step": 2})
    page = urllib.urlopen("http://flash.chinaren.com/ip/mobile.php",
        data ).read().decode('gbk').encode('utf-8')
    result = re.findall("tdc2>(.*?)</TD>", page)
    text = '<span size="24000" color="red" weight="bold">%s</span>' \
            %('\n'+result[1].replace('&nbsp;', '')+'\n\n'+result[2])
    os.system("%s 'Meoww~~,%s机主在:' '%s'" %(notifyargs,string,text))
elif re.match("(https?|ftp)://[\-\.\,/%~_:?\#a-zA-Z0-9=&]+", string):
    #打开url
    os.system("$HOME/bin/firefox '%s'" %string)
elif string=="":
    text = '<span size="24000" color="red" weight="bold">%s</span>' \
            %('\n'+ 'Thou must give me a command!')
    os.system("%s 'Meoww~~,' '%s'" %(notifyargs,text) )


附件:
shot200810011651.png
shot200810011651.png [ 21.4 KiB | 被浏览 1415 次 ]

shot200810011650.png
shot200810011650.png [ 43.29 KiB | 被浏览 1414 次 ]

shot200810011601.png
shot200810011601.png [ 39.21 KiB | 被浏览 1426 次 ]



_________________
弄个dropbox空间来备份文件或者做私人代码服务器
配置:git://github.com/roylez/dotfiles.git
主页:http://roylez.heroku.com
各种稀奇玩意儿:http://dooloo.info


最后由 roylez 编辑于 2008-10-01 14:53,总共编辑了 1 次
页首
 用户资料  
 
2 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2008-10-01 14:36 
头像

注册: 2005-08-14 21:55
帖子: 58428
地址: 长沙
送出感谢: 4
接收感谢: 272
搞集中专制啊。我的都是分开的。翻译/查ip


_________________
● 鸣学


页首
 用户资料  
 
3 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2008-10-01 14:45 
头像

注册: 2005-10-04 10:59
帖子: 1928
地址: 上海
送出感谢: 0 次
接收感谢: 1
eexpress 写道:
搞集中专制啊。我的都是分开的。翻译/查ip


年纪大了,脑子不好使了,键多了记不住。 :em20


页首
 用户资料  
 
4 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2008-10-01 14:51 
头像

注册: 2007-05-08 16:26
帖子: 2058
地址: 火星内核某分子内某原子核内
系统: arch
送出感谢: 20
接收感谢: 6
我也写了个类似的代码,不过是在IRC里用的.
我是初学RUBY,代码比较粗糙.
目前已经实现:
1,google\百度查询
2,中英文单词\整句互译
3,拼音整句查询
4,股票查询
5,IP查询
6,天气查询
7,URL标题查询
8,简单的ruby脚本计算.


代码下载地址: http://code.google.com/p/kk-irc-bot/source/list


_________________
笔记本 :
F208S : gentoo
A460P i3G D6 : UBUNTU + WIN7
UN43D1 : UBUNTU + WIN7
1000人超级QQ群 LINUX + WIN : 31465544 或 18210387


页首
 用户资料  
 
5 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-11-29 21:20 
头像

注册: 2009-11-22 15:29
帖子: 317
送出感谢: 1
接收感谢: 0 次
:em11


_________________
时间就像一张网,你撒在那里,你的收获就在那里。


页首
 用户资料  
 
6 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-11-29 21:36 
头像

注册: 2008-03-23 0:39
帖子: 769
送出感谢: 0 次
接收感谢: 4
除了5楼,我都在irc里见过 :em06
坐等lisp,haskell实现。
perl的应该在git ubuntu cn里有吧。ee那里


页首
 用户资料  
 
7 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-11-29 21:42 
头像

注册: 2008-11-21 20:26
帖子: 36913
送出感谢: 1
接收感谢: 36
我是来拜主席的


_________________
讨厌我的人可以试着点一下
浏览全部ubuntu技巧


页首
 用户资料  
 
8 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-11-29 21:51 
头像

注册: 2008-03-25 15:49
帖子: 25876
地址: 谁知道?
送出感谢: 8
接收感谢: 10
经久耐用型


页首
 用户资料  
 
9 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-11-29 22:45 
头像

注册: 2009-10-16 22:46
帖子: 18958
地址: finland
送出感谢: 28
接收感谢: 48
威武
回寝室了试试去


_________________
>>>>推Ubuntu 桌面培训~~<<<<
>>>>想加入/了解gimp汉化吗,点我吧~<<<<
——————————————————————
不推荐wubi,也不推荐你给别人推荐wubi…………
随心而为的感觉真好……
强推mayhem!!
强推ensiferum


页首
 用户资料  
 
10 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-11-29 23:13 
头像

注册: 2008-04-26 12:41
帖子: 10971
送出感谢: 11
接收感谢: 38
:em09


_________________
[新手必读]wubi安装常见问题(FAQ)
[分享]装双系统的同学必看——Windows与Linux系统共享交换分区的方法
kde下唯美的暗黑内透主题(无需编译)
无穷老机上的Trinity Desktop Environment


页首
 用户资料  
 
11 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-12-01 10:04 
头像

注册: 2009-03-31 8:12
帖子: 24
送出感谢: 0 次
接收感谢: 1
非常给力啊!
一个小问题, 单词翻译的翻译结果里可能有'`',需要把它replace掉。
还有查询结果过长的情况时怎样处理比较好呢?


最后由 skydark 编辑于 2010-12-02 8:19,总共编辑了 1 次

页首
 用户资料  
 
12 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-12-01 10:14 
头像

注册: 2009-10-20 21:13
帖子: 2089
地址: Pacific Western University
送出感谢: 0 次
接收感谢: 7
主席的作品,前排支持.


页首
 用户资料  
 
13 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-12-01 10:21 
头像

注册: 2007-11-19 21:51
帖子: 6956
地址: 成都
送出感谢: 0 次
接收感谢: 4
查中文呢?


页首
 用户资料  
 
14 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-12-01 10:38 
头像

注册: 2005-08-14 21:55
帖子: 58428
地址: 长沙
送出感谢: 4
接收感谢: 272
额。又翻出这了。
我的也有 就monitor-clip.pl
支持更多,比如各种关键词的url自动下载。

回想下,这样的用法,还是蛮好的。


_________________
● 鸣学


页首
 用户资料  
 
15 楼 
 文章标题 : Re: 抛砖引玉--万用查询脚本
帖子发表于 : 2010-12-01 10:41 
头像

注册: 2007-02-02 18:14
帖子: 30702
系统: debian sid
送出感谢: 1
接收感谢: 34
好吧,支持主席和ee大pk :em05


_________________
醉了星星,醉月亮●●●●●The Long Way To Go(*^_^*)


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

当前时区为 UTC + 8 小时


在线用户

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


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

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

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