Changeset 259 for trunk/nagios-velvice/velvice.cgi

Timestamp:

Jun 25, 2018, 9:46:37 PM (7 years ago)

Author:

g7moreau

Message:

• error on path

File:

• trunk/nagios-velvice/velvice.cgi (modified) (2 diffs)

trunk/nagios-velvice/velvice.cgi

@@ -15 +15 @@
 use strict;
 use warnings;
-use version; our $VERSION = version->declare('0.6.3');
+use version; our $VERSION = version->declare('0.6.4');
 
 use CGI;
@@ -27 +27 @@
 my $cgi_check       = uri_decode($query->param('check'));
 my $cgi_script_name = $query->script_name();
-my $cgi_path        = $cgi_script_name =~ s{/$cgi_script_name$}{}r;
+my $cgi_path        = $cgi_script_name =~ s{/[^/]\.cgi$}{}r;
 
 my $config = {};