命令行的Perl：條件退出後不再滿足

Question

我想打印一個文件的所有標題行：

perl -wnl -e "/^#/ and print" file.vcf 

然而這工程─，我要退出，我用頭完成後。

這有什麼錯

perl -wnl -e "/^#/ and print else exit" file.vcf 

？

Answer 1

else是已經找到作爲if和unless報表部分的關鍵字。

perl -wnl -e "if (/^#/) { print } else { exit }" file.vcf 

perl -wnl -e "/^#/ ? print : exit" file.vcf 

perl -wnl -e "/^#/ or exit; print" file.vcf 

perl -wpl -e "/^#/ or exit" file.vcf 

perl -wpl -e "/^#/ or last" file.vcf 

perl -p -e "/^#/ or last" file.vcf 

perl -pe"/^#/ or last" file.vcf 

Answer 2

只要做到：

perl -wnl -e "/^#/ ? print : exit" file.vcf 

Answer 3

或者：

perl -wnl -e "/^#/ && print or exit" file.vcf