perl -a:如何更改列分隔符？

Question

我想读取分隔符所在的文件中的列:.

我试过这样的(因为根据http://www.asciitable.com,冒号的八进制表示是072):

$ echo "a:b:c"  | perl -a -072 -ne 'print "$F[1]\n";' 

我想要它打印b,但它不起作用.

Answer 1

看看-Fperlrun:

% echo "a:b:c" | perl -a -F: -ne 'print "$F[1]\n";'
b

请注意,该值被视为正则表达式,因此某些分隔符可能需要一些额外的转义:

% echo "a.b.c" | perl -a -F. -ne 'print "$F[1]\n";'

% echo "a.b.c" | perl -a -F\\. -ne 'print "$F[1]\n";'
b

Answer 2

-0指定记录(行)分隔符.这是因为Perl收到三行:

>echo a:b:c | perl -072 -nE"say"
a:
b:
c

由于这些行中没有任何空格,$F[1]如果-a要使用它们将是空的.

-F指定输入字段分隔符.这就是你想要的.

perl -F: -lanE'say $F[1];'

或者,如果您遇到旧的Perl:

perl -F: -lane'print $F[1];'

perlrun中记录了命令行选项.