perl -l054p012e'($\,$a)=($a||$\,$b||$/);$b=$\'