vvelox
/
Proc-ProcessTable-Match
1
0
Fork 0
Code Issues Pull Requests Releases 2 Wiki Activity

add ! for size

This commit is contained in:
Zane C. B-H 2019-08-25 02:13:50 -05:00
parent ca2480e66d
commit 4f4de875cb
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Proc-ProcessTable-Match/lib/Proc/ProcessTable/Match/Size.pm
View File

@ -50,6 +50,7 @@ additional comparisons.
<=
>
>=
!
Atleast one Size must be specified.
@ -132,6 +133,7 @@ sub match{
my $size_int=0;
while (defined( $self->{sizes}[$size_int] )){
my $size=$self->{sizes}[$size_int];
if (
( $size =~ /^[0-9]+$/ ) &&
( $size eq $proc_size )
@ -157,6 +159,11 @@ sub match{
if ( $proc_size > $size ){
return 1;
}
}elsif( $size =~ /^\![0-9]+$/ ){
$size=~s/^\!//;
if ( $proc_size ne $size ){
return 1;
}
}
$size_int++;
}