X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Frcmd.pl;h=d8f02d5e2c707bdceb47ac9c285efa54064189af;hb=ae313f260d904cd45b58e4d1e620a49aef1a42c9;hp=deff4d33f283c631c2bddf3859eb4ded8204b723;hpb=3194378dfc13933cfaaae43989b971d8994d17aa;p=spider.git diff --git a/cmd/show/rcmd.pl b/cmd/show/rcmd.pl index deff4d33..d8f02d5e 100644 --- a/cmd/show/rcmd.pl +++ b/cmd/show/rcmd.pl @@ -13,7 +13,7 @@ my $cmdline = shift; my @f = split /\s+/, $cmdline; my $f; my @out; -my ($from, $to); +my ($from, $to, $who); $from = 0; while ($f = shift @f) { # next field @@ -26,9 +26,12 @@ while ($f = shift @f) { # next field ($to) = $f =~ /^(\d+)$/o if !$to; # is it a to count? next if $to; } + next if $who; + ($who) = $f =~ /^(\w+)/o; } -$to = 20 if !$to; +$to = 20 unless $to; +$from = 0 unless $from; -@out = DXLog::print($from, $to, $main::systime, '^rcmd'); +@out = DXLog::print($from, $to, $main::systime, 'rcmd', $who); return (1, @out);