From 9edecb96a1f23e322ae41cf8c6c9601279576c0c Mon Sep 17 00:00:00 2001 From: garnier-quentin Date: Fri, 9 Dec 2016 14:30:47 +0100 Subject: [PATCH] + Fix list-applications tomcat --- apps/tomcat/web/mode/applications.pm | 2 +- apps/tomcat/web/mode/listapplication.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/apps/tomcat/web/mode/applications.pm b/apps/tomcat/web/mode/applications.pm index f360564b8..30372d661 100644 --- a/apps/tomcat/web/mode/applications.pm +++ b/apps/tomcat/web/mode/applications.pm @@ -65,7 +65,7 @@ sub manage_selection { my $webcontent = $self->{http}->request(); - while ($webcontent =~ /^(.*?):(.*?):(.*?):(.*)/mg) { + while ($webcontent =~ /^(.*?):(.*?):(.*?):(.*)/mg) { my ($context, $state, $sessions, $contextpath) = ($1, $2, $3, $4); next if (defined($self->{option_results}->{filter_path}) && $self->{option_results}->{filter_path} ne '' && diff --git a/apps/tomcat/web/mode/listapplication.pm b/apps/tomcat/web/mode/listapplication.pm index 64ddd53e8..fa88ba7e5 100644 --- a/apps/tomcat/web/mode/listapplication.pm +++ b/apps/tomcat/web/mode/listapplication.pm @@ -64,7 +64,7 @@ sub manage_selection { my $webcontent = $self->{http}->request(); - while ($webcontent =~ m/(.*):(.*):(.*):(.*)/g) { + while ($webcontent =~ /^(.*?):(.*?):(.*?):(.*)/mg) { my ($context, $state, $sessions, $contextpath) = ($1, $2, $3, $4); if (defined($self->{option_results}->{filter_name}) && $self->{option_results}->{filter_name} ne '' &&