Perl China Blog Spot

2011年5月16日星期一

Re: [PerlChina] LWP::UserAgnet->get(https://...) not work through proxy

You should try HTTP::ProxyPAC if you want proxy auto configuration:

use strict;

use LWP::UserAgent;

use Data::Dumper;

use HTTP::ProxyPAC;

my $ua=LWP::UserAgent->new();

my $pacFile = 'http://corppac.myclient.com/accelerated_pac_base.pac';

my $pac = HTTP::ProxyPAC->new($pacFile);

my $res = $pac->find_proxy($url);

$ua->proxy(['https', 'http'] => $res->proxy) if $res->proxy;

my $response = $ua->get('https://login.yahoo.com/config/login_verify2?&.src=ym');

print Dumper $response;

Make sure you have IO::Socket::SSL or Net::SSL installed for HTTPS support, IO::Socket::SSL is recommended.

2011/5/17 tiger <tigerpeng2001@gmail.com>

Could anyone help on the following test script (run on strawberry
perl)?

It works (with $ua->proxy... commented out) when it is not behind
proxy, but fails to access https pagethrough proxy (with '_msg' =>
'Bad Request'.). It is okay to access http pages. No problem for
accessing https pages with MSIE and Firfox through proxy.

Thanks,

use strict;
use LWP::UserAgent;
use Data::Dumper;

my $ua=LWP::UserAgent->new();
$ua->proxy(['https', 'http'] => 'http://corppac.myclient.com/
accelerated_pac_base.pac');
my $response = $ua->get('https://login.yahoo.com/config/login_verify2?
&.src=ym');
#my $response = $ua->get('http://www.yahoo.com');
print Dumper $response;

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

Re: [PerlChina] LWP::UserAgnet->get(https://...) not work through proxy

you should specify the real proxy instead of pac file. it should be a
host (with user/pass/port if needed).

Thanks

2011/5/17 tiger <tigerpeng2001@gmail.com>:
> Could anyone help on the following test script (run on strawberry
> perl)?
>
> It works (with $ua->proxy... commented out) when it is not behind
> proxy, but fails to access https pagethrough proxy (with '_msg' =>
> 'Bad Request'.). It is okay to access http pages. No problem for
> accessing https pages with MSIE and Firfox through proxy.
>
> Thanks,
>
>
> use strict;
> use LWP::UserAgent;
> use Data::Dumper;
>
> my $ua=LWP::UserAgent->new();
> $ua->proxy(['https', 'http'] => 'http://corppac.myclient.com/
> accelerated_pac_base.pac');
> my $response = $ua->get('https://login.yahoo.com/config/login_verify2?
> &.src=ym');
> #my $response = $ua->get('http://www.yahoo.com');
> print Dumper $response;
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>
>

--
Fayland Lam // http://www.fayland.org/

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

[PerlChina] LWP::UserAgnet->get(https://...) not work through proxy

Could anyone help on the following test script (run on strawberry
perl)?

It works (with $ua->proxy... commented out) when it is not behind
proxy, but fails to access https pagethrough proxy (with '_msg' =>
'Bad Request'.). It is okay to access http pages. No problem for
accessing https pages with MSIE and Firfox through proxy.

Thanks,

use strict;
use LWP::UserAgent;
use Data::Dumper;

my $ua=LWP::UserAgent->new();
$ua->proxy(['https', 'http'] => 'http://corppac.myclient.com/
accelerated_pac_base.pac');
my $response = $ua->get('https://login.yahoo.com/config/login_verify2?
&.src=ym');
#my $response = $ua->get('http://www.yahoo.com');
print Dumper $response;

2011年5月15日星期日

Re: [PerlChina] Perl 5.14.0 正式发布

woosley@woosley:~/perl5/perlbrew$perl --version

This is perl 5, version 14, subversion 0 (v5.14.0) built for i686-linux

Copyright 1987-2011, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl". If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

我最喜欢操作hash/array引用的新特性

$perl -E '$a = []; push $a, qw/hello Perl-5.14.0/; say "@$a"'
hello Perl-5.14.0

在 2011年5月15日下午2:57，Robin Lee <robinlee.sysu@gmail.com>写道：

详见： http://search.cpan.org/~jesse/perl-5.14.0/pod/perldelta.pod

基本上是标题党，因为目前还没用上。看完 delta 后列两个个人比较喜欢的新特性：

1. 新的正则替换选项 /r
一直来正则替换（s///）都是直接作用于操作变量。要想原操作变量不变，只想要把替换后的结果保存要另一个变量，要这样写：
my $old = "cat";
my $new = $old;
$new =~ s/cat/dog/;

有了 /r 选项后，就可以这样写
my $old = "cat";
my $new = $old =~ s/cat/dog/r;

也即是正则替换不修改操作变量，并且把替换后的结果作为返回值。

2. package NAMCESPACE [VERSION] BLOCK
package Foo { ... } 相当于 { package Foo; ... }
package Foo 1.2 { ... } 相当于 { package Foo; $VERSION = 1.2; ... }

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
Woosley.Xu

2011年5月14日星期六

[PerlChina] Perl 5.14.0 正式发布

详见： http://search.cpan.org/~jesse/perl-5.14.0/pod/perldelta.pod

基本上是标题党，因为目前还没用上。看完 delta 后列两个个人比较喜欢的新特性：

1. 新的正则替换选项 /r
一直来正则替换（s///）都是直接作用于操作变量。要想原操作变量不变，只想要把替换后的结果保存要另一个变量，要这样写：
my $old = "cat";
my $new = $old;
$new =~ s/cat/dog/;

有了 /r 选项后，就可以这样写
my $old = "cat";
my $new = $old =~ s/cat/dog/r;

也即是正则替换不修改操作变量，并且把替换后的结果作为返回值。

2. package NAMCESPACE [VERSION] BLOCK
package Foo { ... } 相当于 { package Foo; ... }
package Foo 1.2 { ... } 相当于 { package Foo; $VERSION = 1.2; ... }

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

2011年5月12日星期四

Re: [PerlChina] 关于2011 perlchina大会讨论

8错8错，去混一下，吸收点营养。

在 2011年5月13日上午11:07，Achilles Xu <formalin14@gmail.com>写道：

前年吧，嘿嘿

在 2011年5月13日上午9:20，黄庚根 <huanggeng.8552@gmail.com>写道：

今年没在北京，参加不了。现在身上还穿着去年大会发的衣服。

2011/5/12 Achilles Xu <formalin14@gmail.com>

这次perl6的核心开发人Jathn会过来（可能拼写得不对），他会提供几个parrot和perl6的talk。

我自己会提供几个perl6实践、anyevent、twisted相关的talk。

另外也邀请了其他几个人准备talk。

不过我希望还是多些各地自发提交的演讲。不要光是组织者把演讲垄断了。机会优先给自发提交的演讲。来演讲的报销路费，且会有礼品。

另外也欢迎其他赞助加入。

大会时间正式定为7月2日星期六。欢迎大家来参加。

大会报名网站 http://conference.perlchina.org/bjpw2011/ ，上面还有一些错误（特别是日期，呵呵），会尽快改过来。但是不妨碍大家报名。

在 2011年5月12日下午2:57，Felix New <moxnet@gmail.com>写道：

很是好奇,　在workshop 2011的报名用户统计中,　看到一个　凤唐 (在第三页),　这是大牛本尊么?　还是同名的perler?

另想关注一下,　本次workshop有哪些演讲主题?　

在 2011年1月12日下午9:03，HY@CN <think.hy@gmail.com>写道：

我是从09年的大会才开始了解和学习Perl，这一年多来，Perl让我的工作效率大增，期待这次大会。

在 2011年1月12日上午10:18，Achilles Xu <formalin14@gmail.com>写道：

大家好：

2010年没有举行perlchina大会，打算2011年春季搞一下。已经跟nomas和qiang电话讨论了一下。现在关键是确定举行的日期，然后才好确定场地和收集演讲。

想听听大家有没有什么建议和指导，各方面的都行。如果可以，北京这边的热心朋友最好能聚一下讨论一下。

同时也开始征集一下演讲和志愿者。举行地点初定北京，主题是：perl、架构、集群。有演讲意愿的请回到这个邮件里或者直接mail我都行。我最近会勤着看邮箱。

大会准备事宜如下：

确定举行日期（今年春季，需要确定具体日期）；

找赞助商（目前已经有打算赞助的，再拉几家）；

确定场地；

收集演讲；

制作纪念品；

开启在线会议报名系统；

各处发通告；

准备会场（我可以找些美女过去帮忙）；

感谢大家参与，让我们共同努力，让perl更加辉煌。（明年有计划加力推广perl6的线上使用，欢迎有相同意愿的人参与。）

--
---------------------------
Achilles Xu

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
HY_CN

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
Best regards.
Felix New

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
---------------------------
Achilles Xu

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
---------------------------
Achilles Xu

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

[PerlChina] [perlchina] 通告：Perl开源技术大会将于7月2日在北京举行

由PerlChina主办，ChinaCache协办，于2011年7月2号星期六在北京举行的Perl开源技术大会是一个免费的开源技术交流会，大会全天，向所有对开源技术感兴趣的朋友开放。

大会的主题为 Perl, Database, Javascript, erlang, 分布式，集群，Lua等开源软件。演讲会在两个厅同时进行，其中一个厅以 Perl 内容为主，另一个厅是所有其他的主题。

此次会议很荣幸邀请到Perl6的核心领导者Jnthn过来，跟大家分享一些Talk。

欢迎大家前来参加，
报名地址： http://conference.perlchina.org/bjpw2011/
请注意注册以后，还要确认参加大会。参加过前几届会议的用户直接登录确认即可。

同时也希望大家踊跃贡献演讲，
提交演讲地址： http://conference.perlchina.org/bjpw2011/newtalk
查看已有演讲地址： http://conference.perlchina.org/bjpw2011/talks

赞助商对大会的成功举办非常重要。我们接受书籍，小礼品和现金的赞助方式。我们也为赞助商提供相应的回报，列下：

通过对开源大会的赞助来提升企业形象
在大会上对特定人群进行员工招募（请提前和大会组织者确认）
大会主页提供贵公司的图标和链接
在大会的开幕和闭幕上对贵公司的赞助口头感谢
在新闻发布里把贵公司列为赞助商
向大会提供贵公司的小礼品和宣传品

如果您对赞助感兴趣，请联系我们：formalin14 at gmail dot com， QQ 29 19 61 59。

也请各位爱好者广为转发该消息，谢谢。

--
---------------------------
Achilles Xu

订阅：博文 (Atom)

2011年5月16日星期一

2011年5月15日星期日

2011年5月14日星期六

2011年5月12日星期四

订阅

博客归档