note
eyepopslikeamosquito
<P>
Long ago on usenet, Tom Christiansen once wrote:
<I>"If you find yourself calling cat with just one argument,
you're probably doing something silly"</I>.
So you should lose the cat and replace:
<CODE>
cat /tmp/1.out|perl -lane 'print $F[1]..$F[-1]'
</CODE>
with (using the [id://1011707|LanX slice idea]):
<CODE>
perl -lane 'print join q{ }, @F[1..$#F]' /tmp/1.out
</CODE>
or:
<CODE>
perl -lape '$_=join q{ }, @F[1..$#F]' /tmp/1.out
</CODE>
or even (for variety, not recommended):
<CODE>
perl -lpe 's/\s*\S+\s*//' /tmp/1.out
</CODE>
</P>
<P>
Update: See also [id://1113576]
</P>
1011694
1011694