perl 三元操作符问题

kernel69

直接上代码如下，个人认为是三元优先级比较高的问题，但不知道怎么改，看perldoc perlop也没看明白，求帮忙修改，顺便再帮忙解释一下，谢谢大家了

1. $ perl -lane '$F[3]=~4 ? $F[5]="| $F[5]";print @F : next' a
   
2. syntax error at -e line 1, near ""| $F[5]";"
   
3. syntax error at -e line 1, near "@F :"
   
4. Execution of -e aborted due to compilation errors.
   
5. $

复制代码

fkiori

很少用单行的perl代码
不过有几个建议。
1. 加上小括号，明确优先级。 perl太自由了，有时候很难看明白
2. 单行的时候 $变量 可能会和linux下的环境变量冲突。建议加\

kernel69

自己也尝试加了，但可能是加的位置不对，运行依然报错
回复 2# fkiori


   

zhlong8

$F[3]=~4 ? $F[5]="| $F[5]";print @F : next

?: 的3个部分都要求是表达式。语法上多个语句要用 do {} 圈起来才算表达式

$F[3]=~4 ? do { $F[5]="| $F[5]";print @F } : next

dqw233

perl -lane 'do{$F[3]=~4 ? $F[5]="| $F[5]";print @F }: next' a

要用do{expr1;expr2;expr3}将多个statements转为一个statement

kernel69

@zhlong8@dqw233学习了