doc cleanup
This commit is contained in:
parent
4f4de875cb
commit
6ef1809a3b
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one EGID must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -158,6 +159,12 @@ sub match{
|
|||
return 1;
|
||||
}
|
||||
}
|
||||
elsif( $egid =~ /^\![0-9]+$/ ){
|
||||
$egid=~s/^\!//;
|
||||
if ( $proc_egid ne $egid ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$egid_int++;
|
||||
}
|
||||
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one EUID must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -157,6 +158,11 @@ sub match{
|
|||
if ( $proc_euid > $euid ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $euid =~ /^\![0-9]+$/ ){
|
||||
$euid=~s/^\!//;
|
||||
if ( $proc_euid ne $euid ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$euid_int++;
|
||||
}
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one GID must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -157,6 +158,11 @@ sub match{
|
|||
if ( $proc_gid > $gid ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $gid =~ /^\![0-9]+$/ ){
|
||||
$gid=~s/^\!//;
|
||||
if ( $proc_gid ne $gid ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$gid_int++;
|
||||
}
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one PctCPU must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -157,6 +158,11 @@ sub match{
|
|||
if ( $proc_pctcpu > $pctcpu ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $pctcpu =~ /^\![0-9.]+$/ ){
|
||||
$pctcpu=~s/^\!//;
|
||||
if ( $proc_pctcpu ne $pctcpu ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$pctcpu_int++;
|
||||
}
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one PctMem must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -170,6 +171,11 @@ sub match{
|
|||
if ( $proc_pctmem > $pctmem ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $pctmem =~ /^\![0-9.]+$/ ){
|
||||
$pctmem=~s/^\!//;
|
||||
if ( $proc_pctmem ne $pctmem ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$pctmem_int++;
|
||||
}
|
||||
|
|
|
@ -50,6 +50,7 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one Priority must be specified.
|
||||
|
||||
|
@ -157,6 +158,11 @@ sub match{
|
|||
if ( $proc_priority > $priority ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $priority =~ /^\![0-9]+$/ ){
|
||||
$priority=~s/^\!//;
|
||||
if ( $proc_priority ne $priority ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$priority_int++;
|
||||
}
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one RSS must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -157,6 +158,11 @@ sub match{
|
|||
if ( $proc_rss > $rss ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $rss =~ /^\![0-9]+$/ ){
|
||||
$rss=~s/^\!//;
|
||||
if ( $proc_rss ne $rss ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$rss_int++;
|
||||
}
|
||||
|
|
|
@ -52,7 +52,7 @@ additional comparisons.
|
|||
>=
|
||||
!
|
||||
|
||||
Atleast one Size must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one Start must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -133,30 +134,35 @@ sub match{
|
|||
while (defined( $self->{starts}[$start_int] )){
|
||||
my $start=$self->{starts}[$start_int];
|
||||
if (
|
||||
( $start =~ /^[0-9]+$/ ) &&
|
||||
( $start =~ /^[.0-9]+$/ ) &&
|
||||
( $start eq $proc_start )
|
||||
){
|
||||
return 1;
|
||||
}elsif( $start =~ /^\<\=[0-9]+$/ ){
|
||||
}elsif( $start =~ /^\<\=[.0-9]+$/ ){
|
||||
$start=~s/^\<\=//;
|
||||
if ( $proc_start <= $start ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $start =~ /^\<[0-9]+$/ ){
|
||||
}elsif( $start =~ /^\<[.0-9]+$/ ){
|
||||
$start=~s/^\<//;
|
||||
if ( $proc_start < $start ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $start =~ /^\>\=[0-9]+$/ ){
|
||||
}elsif( $start =~ /^\>\=[.0-9]+$/ ){
|
||||
$start=~s/^\>\=//;
|
||||
if ( $proc_start >= $start ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $start =~ /^\>[0-9]+$/ ){
|
||||
}elsif( $start =~ /^\>[.0-9]+$/ ){
|
||||
$start=~s/^\>//;
|
||||
if ( $proc_start > $start ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $start =~ /^\![.0-9]+$/ ){
|
||||
$start=~s/^\!//;
|
||||
if ( $proc_start ne $start ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$start_int++;
|
||||
}
|
||||
|
|
|
@ -50,8 +50,9 @@ additional comparisons.
|
|||
<=
|
||||
>
|
||||
>=
|
||||
!
|
||||
|
||||
Atleast one Time must be specified.
|
||||
Atleast one value must be specified.
|
||||
|
||||
If the new method fails, it dies.
|
||||
|
||||
|
@ -133,31 +134,37 @@ sub match{
|
|||
while (defined( $self->{times}[$time_int] )){
|
||||
my $time=$self->{times}[$time_int];
|
||||
if (
|
||||
( $time =~ /^[0-9]+$/ ) &&
|
||||
( $time =~ /^[.0-9]+$/ ) &&
|
||||
( $time eq $proc_time )
|
||||
){
|
||||
return 1;
|
||||
}elsif( $time =~ /^\<\=[0-9]+$/ ){
|
||||
}elsif( $time =~ /^\<\=[.0-9]+$/ ){
|
||||
$time=~s/^\<\=//;
|
||||
if ( $proc_time <= $time ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $time =~ /^\<[0-9]+$/ ){
|
||||
}elsif( $time =~ /^\<[.0-9]+$/ ){
|
||||
$time=~s/^\<//;
|
||||
if ( $proc_time < $time ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $time =~ /^\>\=[0-9]+$/ ){
|
||||
}elsif( $time =~ /^\>\=[.0-9]+$/ ){
|
||||
$time=~s/^\>\=//;
|
||||
if ( $proc_time >= $time ){
|
||||
return 1;
|
||||
}
|
||||
}elsif( $time =~ /^\>[0-9]+$/ ){
|
||||
}elsif( $time =~ /^\>[.0-9]+$/ ){
|
||||
$time=~s/^\>//;
|
||||
if ( $proc_time > $time ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
elsif( $time =~ /^\![.0-9]+$/ ){
|
||||
$time=~s/^\!//;
|
||||
if ( $proc_time ne $time ){
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
$time_int++;
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in New Issue