贡献一个扫号的SCRIPT - 未名空间MITBBS历史存档

国际科技财经博客移民网络热点娱乐民生时事公众号

Redian新闻

>未名空间

>EB23 - 劳工卡

贡献一个扫号的SCRIPT

贡献一个扫号的SCRIPT# EB23 - 劳工卡

b*k2014-05-01 07:05

1 楼

贡献一个扫号的PERL script
1. 你需要能运行PERL的环境，第一行路径可能需要修改成你环境里PERL的路径。
2. 需要安装好LWP
http://goo.gl/jhMVLq
在COMMAND LINE运行：
perl uscis.pl
回答需要三个问题：
1. SRC, LIN, NSC。。。
2. Starting number?
3. How many to scan?
觉得有用的给发包子吧。

p*s2014-05-01 07:05

2 楼

延迟多久？会被封ip的

★ 发自iPhone App: ChineseWeb 8.6

【在 b***k 的大作中提到】

: 贡献一个扫号的PERL script
: 1. 你需要能运行PERL的环境，第一行路径可能需要修改成你环境里PERL的路径。
: 2. 需要安装好LWP
: http://goo.gl/jhMVLq
: 在COMMAND LINE运行：
: perl uscis.pl
: 回答需要三个问题：
: 1. SRC, LIN, NSC。。。
: 2. Starting number?
: 3. How many to scan?

b*k2014-05-01 07:05

3 楼

自己可以改， DEFAULT是1秒。我过去扫了很久了，从没有被封过。

【在 p*********s 的大作中提到】

: 延迟多久？会被封ip的
:
: ★ 发自iPhone App: ChineseWeb 8.6

s*y2014-05-01 07:05

4 楼

你这个运行出来是这样：
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.

【在 b***k 的大作中提到】

b*k2014-05-01 07:05

5 楼

you don't have LWP. read the original post.

【在 s***y 的大作中提到】

: 你这个运行出来是这样：
: An error occurred.
: An error occurred.
: An error occurred.
: An error occurred.
: An error occurred.
: An error occurred.
: An error occurred.
: An error occurred.
: An error occurred.

s*y2014-05-01 07:05

6 楼

Sorry. But I have it!
$ perl -MLWP -le "print(LWP->VERSION)"
6.03

【在 b***k 的大作中提到】

: you don't have LWP. read the original post.

b*k2014-05-01 07:05

7 楼

试试在getpage里面加点debug语句，看样子是LWP返回的东西没有match到需要找的东
西。干脆回头把它用pp包装了以后再发吧

s*y2014-05-01 07:05

8 楼

谢谢！我正准备加点print statement
会不会是单位网关封端口？

【在 b***k 的大作中提到】

: 试试在getpage里面加点debug语句，看样子是LWP返回的东西没有match到需要找的东
: 西。干脆回头把它用pp包装了以后再发吧

b*k2014-05-01 07:05

9 楼

你分析出问题来可以改一改报错信息，更直观点

s*y2014-05-01 07:05

10 楼

Can't connect to egov.uscis.gov:443 (certificate verify failed)
LWP::Protocol::https::Socket: SSL connect attempt failed with unknown
errorerror:14090086:SSL routines:SSL3_GET_SERVER_CERTIFICATE:certificate
verify failed at /usr/share/perl5/LWP/Protocol/http.pm line 51, <> line 3.
An error occurred.
看来是证书的问题。。

【在 b***k 的大作中提到】

: 你分析出问题来可以改一改报错信息，更直观点

b*k2014-05-01 07:05

11 楼

这样的话，试试这个option:
http://stackoverflow.com/questions/6795030/how-to-ignore-certif

f*e2014-05-01 07:05

12 楼

天啊，查個綠卡狀態，要怎麼高技術？嘻嘻

p*s2014-05-01 07:05

13 楼

能不能发布一个把485状态变成card production的tool? 我出10个四喜丸子买了！

★ 发自iPhone App: ChineseWeb 8.6

【在 b***k 的大作中提到】

: 这样的话，试试这个option:
: http://stackoverflow.com/questions/6795030/how-to-ignore-certif

b*k2014-05-01 07:05

14 楼

你两年前给我做一个出来，我给你10000美金。lol

b*k2014-05-01 07:05

15 楼

是查周围人状态必须的工具。：）

p*s2014-05-01 07:05

16 楼

你扫人家老墨身上了都

★ 发自iPhone App: ChineseWeb 8.6

【在 b***k 的大作中提到】

: 是查周围人状态必须的工具。：）

T*h2014-05-01 07:05

17 楼

以前有人贴过直接在excel里运行的script

【在 b***k 的大作中提到】

f*e2014-05-01 07:05

18 楼

對，我自己用vba在excel裡掃，很慢感覺。

【在 T*******h 的大作中提到】

: 以前有人贴过直接在excel里运行的script

s*y2014-05-01 07:05

19 楼

申绿卡是一时的，搞技术是一辈子的

【在 f********e 的大作中提到】

: 天啊，查個綠卡狀態，要怎麼高技術？嘻嘻

s*y2014-05-01 07:05

20 楼

谢了，我明天好好研究下

【在 b***k 的大作中提到】

: 这样的话，试试这个option:
: http://stackoverflow.com/questions/6795030/how-to-ignore-certif

f*e2014-05-01 07:05

21 楼

那是啊，用戶未必懂debug哦，都是拿來就用。哈哈

【在 s***y 的大作中提到】

: 申绿卡是一时的，搞技术是一辈子的

m*u2014-05-01 07:05

22 楼

在cygwin里运行你的script,
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
An error occurred.
好久没用perl了，不知道是不是证书的问题，明天有空重温perl

【在 b***k 的大作中提到】

: 是查周围人状态必须的工具。：）

c*e2014-05-01 07:05

23 楼

谢谢！很好用。
穷人木有包子，掩面跑走。。。

b*k2014-05-01 07:05

24 楼

你试试下packaged程序，应该是会把证书验证忽略掉了。昨天在mac和unix上试了能正
常运行

m*u2014-05-01 07:05

25 楼

没mac和unix,只有个cygwin. 只下package(9.3M)只有一个uscis文件，如何执行呢？

【在 b***k 的大作中提到】

: 你试试下packaged程序，应该是会把证书验证忽略掉了。昨天在mac和unix上试了能正
: 常运行

m*u2014-05-01 07:05

26 楼

郁闷呀，为了这script,先装了Linux Mint, 折腾半天装不上LWP. 只好再装Ubuntu,折
腾半天总算装上了LWP. 运行这个script一样的结果，还是An error occurred. 运行
那个9.3M的package也不行:( 哪里有问题？多谢

？
能正

【在 m***u 的大作中提到】

: 没mac和unix,只有个cygwin. 只下package(9.3M)只有一个uscis文件，如何执行呢？

a*92014-05-01 07:05

27 楼

谢谢。收藏先，有空研究下。

b*k2014-05-01 07:05

28 楼

刚看到，其实你有了LWP和PERL的话，在ubuntu里面直接运行小的那个PERL script就
可以了。
错误看样子还是因为LWP没有返回需要的数据，多半是certificate的问题。我没有条
件在各个环境下测试，对不起哈。

【在 m***u 的大作中提到】

: 郁闷呀，为了这script,先装了Linux Mint, 折腾半天装不上LWP. 只好再装Ubuntu,折
: 腾半天总算装上了LWP. 运行这个script一样的结果，还是An error occurred. 运行
: 那个9.3M的package也不行:( 哪里有问题？多谢
:
: ？
: 能正

n*g2014-05-01 07:05

29 楼

谢谢扫号神器。可惜包子发完了。。。

g*22014-05-01 07:05

30 楼

我在mac上运行出现如下错误信息，是怎么回事啊？
Illegal instruction: 4
谢谢！

【在 b***k 的大作中提到】

: 你试试下packaged程序，应该是会把证书验证忽略掉了。昨天在mac和unix上试了能正
: 常运行

m*u2014-05-01 07:05

31 楼

就是运行那个小script出错呀，现搜索的perl如何debug, 结果也没啥用,就是
那个if语句fail了，不知道为啥:(
给你发个包子吧，多谢你的热心了。没啥对不起呀，你这是好人呀。

Ubuntu,折
运行

【在 b***k 的大作中提到】

: 刚看到，其实你有了LWP和PERL的话，在ubuntu里面直接运行小的那个PERL script就
: 可以了。
: 错误看样子还是因为LWP没有返回需要的数据，多半是certificate的问题。我没有条
: 件在各个环境下测试，对不起哈。

b*k2014-05-01 07:05

32 楼

你试试那个SCRIPT版本的.

【在 g****2 的大作中提到】

: 我在mac上运行出现如下错误信息，是怎么回事啊？
: Illegal instruction: 4
: 谢谢！

b*k2014-05-01 07:05

33 楼

在SCRIPT的版本里:
第32行后面加:
foreach my $k (keys %{$res}) {
print STDERR "$k: $res->{$k}; \n";
}
看看输出是什么.
BTW,
多谢包子.

【在 m***u 的大作中提到】

: 就是运行那个小script出错呀，现搜索的perl如何debug, 结果也没啥用,就是
: 那个if语句fail了，不知道为啥:(
: 给你发个包子吧，多谢你的热心了。没啥对不起呀，你这是好人呀。
:
: Ubuntu,折
: 运行

g*22014-05-01 07:05

34 楼

刚试了下，script版本的能用，多谢了，请收双黄包：）

【在 b***k 的大作中提到】

: 你试试那个SCRIPT版本的.

b*k2014-05-01 07:05

35 楼

收到。多谢。：）

【在 g****2 的大作中提到】

: 刚试了下，script版本的能用，多谢了，请收双黄包：）

m*u2014-05-01 07:05

36 楼

多谢，原来是LWP::Protocol::https没有装。 ubuntu和cygwin里都是一样的原因。
ubuntu装了以后运行就没问题了，多谢。 cygwin装LWP::Protocol::https用cpan
没搞定,不知道要装啥package.
Ubuntu下好使就好了，扫号利器呀，多谢。

【在 b***k 的大作中提到】

: 在SCRIPT的版本里:
: 第32行后面加:
: foreach my $k (keys %{$res}) {
: print STDERR "$k: $res->{$k}; \n";
: }
: 看看输出是什么.
: BTW,
: 多谢包子.

b*k2014-05-01 07:05

37 楼

多谢，在原贴里面也更新了。

【在 m***u 的大作中提到】

: 多谢，原来是LWP::Protocol::https没有装。 ubuntu和cygwin里都是一样的原因。
: ubuntu装了以后运行就没问题了，多谢。 cygwin装LWP::Protocol::https用cpan
: 没搞定,不知道要装啥package.
: Ubuntu下好使就好了，扫号利器呀，多谢。