I had to change the command:
3451,3452c3451,3452
< my $sysv = q( ps -ef | perl -ane '1..1 and /^(.*)CO?MM?A?N?D/
and $s=length $1;).
< q(s/^.{$s}//; print "@F[1,2] $_"' );
---
> my $sysv = q( ps -ef | perl -ane "1..1 and /^(.*)CO?MM?A?N?D/
and $s=length $1;).
>
On Sun, Apr 5, 2015 at 10:12 AM, Tzafrir Poupko wrote:
> I had to change the command:
Why?
> 3451,3452c3451,3452
> < my $sysv = q( ps -ef | perl -ane '1..1 and /^(.*)CO?MM?A?N?D/
> and $s=length $1;).
> < q(s/^.{$s}//; print "@F[1,2] $_"' );
> ---
>> my $sysv =