Redian新闻
>
chase sapphire preferred and ua chase explorer有没有必要同时拥有
avatar
chase sapphire preferred and ua chase explorer有没有必要同时拥有# Money - 海外理财
k*n
1
#!/usr/local/bin/perl
open FH, shift @ARGV;
map{ chomp; $isword{uc join "", sort /./g} .= "$_+" } ;
map{ chop $isword{$_} } keys %isword;
请问大牛们,
1)这两个map执行什么操作?
2)有什么经典的perl书籍可看吗?
多谢了。
avatar
m*n
2
只能有一个的话 是不是必须sapphire比较好?
avatar
j*x
3
perl的语法看上去总是那么费解,但是很炫。。。
avatar
a*a
4
I think so.
avatar
d*p
5

// open a file with the 1st element of array @ARGV
// construct a hash each of whose key is a unique line in the file, all
upper cased. the value is a concatenation of all found lines
// remove the trailing +

【在 k****n 的大作中提到】
: #!/usr/local/bin/perl
: open FH, shift @ARGV;
: map{ chomp; $isword{uc join "", sort /./g} .= "$_+" } ;
: map{ chop $isword{$_} } keys %isword;
: 请问大牛们,
: 1)这两个map执行什么操作?
: 2)有什么经典的perl书籍可看吗?
: 多谢了。

avatar
P*n
6
可以同时有啊,没有冲突。除非你的chase卡太多了?
avatar
d*8
7
如果没人懂的话,老衲到愿意一试
第一个map 是将变量加入到一个hash/array/dict 里面。具体地讲,就是读取一个文件
,然后将文件的每一行先sort 一遍,然后uc 后添加到hash/array/dict 里面。
第二个map 其实就是将hash/array/dict 的每一个元素打印出来

【在 k****n 的大作中提到】
: #!/usr/local/bin/perl
: open FH, shift @ARGV;
: map{ chomp; $isword{uc join "", sort /./g} .= "$_+" } ;
: map{ chop $isword{$_} } keys %isword;
: 请问大牛们,
: 1)这两个map执行什么操作?
: 2)有什么经典的perl书籍可看吗?
: 多谢了。

avatar
B*y
8
我俩个卡都有,都打算留着,就是两个同时交年费比较肉痛。相比较它们的好处而言,
还是划算的。
avatar
t*n
9
比较经典的Perl书首推Oriely的骆驼书

【在 k****n 的大作中提到】
: #!/usr/local/bin/perl
: open FH, shift @ARGV;
: map{ chomp; $isword{uc join "", sort /./g} .= "$_+" } ;
: map{ chop $isword{$_} } keys %isword;
: 请问大牛们,
: 1)这两个map执行什么操作?
: 2)有什么经典的perl书籍可看吗?
: 多谢了。

avatar
b*s
10
UA好
avatar
n*o
11
sapphire可以连freedom啊。。如果不需要ua的travel feature的话,还是留蓝宝石吧
avatar
l*n
12
为啥? 我怎么觉得sapphire preferred更灵活呢?

【在 b******s 的大作中提到】
: UA好
相关阅读
logo
联系我们隐私协议©2024 redian.news
Redian新闻
Redian.news刊载任何文章,不代表同意其说法或描述,仅为提供更多信息,也不构成任何建议。文章信息的合法性及真实性由其作者负责,与Redian.news及其运营公司无关。欢迎投稿,如发现稿件侵权,或作者不愿在本网发表文章,请版权拥有者通知本网处理。