Perl：打印除模式之外的所有内容

Question

给出一个文件

input [7:0] di,     
input AEN, 

我想打印

di 
AEN 

作为输出。我该怎么做perl？

有人可以帮助我吗？

Answer 1

您可以从命令行使用perl，

perl -lane 'print $F[-1] =~ /(\w+)/' file

Answer 2

您可以尝试下面的perl one-liner命令。

$ perl -pe 's/(?:^input\s*(?:\[\d+:\d+])?\s+|,)//g' file
di     
AEN