Merge branch 'develop' into 'ent-3432-Nueva-cabecera-y-menu-lateral'
Conflicts: pandora_console/install.php Former-commit-id: 35214830b309620c88c44b32f93cfae93775e9a8
This commit is contained in:
commit
acc44ff9ce
|
@ -1,5 +1,5 @@
|
||||||
package: pandorafms-agent-unix
|
package: pandorafms-agent-unix
|
||||||
Version: 7.0NG.732-190305
|
Version: 7.0NG.732-190306
|
||||||
Architecture: all
|
Architecture: all
|
||||||
Priority: optional
|
Priority: optional
|
||||||
Section: admin
|
Section: admin
|
||||||
|
|
|
@ -14,7 +14,7 @@
|
||||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
# GNU General Public License for more details.
|
# GNU General Public License for more details.
|
||||||
|
|
||||||
pandora_version="7.0NG.732-190305"
|
pandora_version="7.0NG.732-190306"
|
||||||
|
|
||||||
echo "Test if you has the tools for to make the packages."
|
echo "Test if you has the tools for to make the packages."
|
||||||
whereis dpkg-deb | cut -d":" -f2 | grep dpkg-deb > /dev/null
|
whereis dpkg-deb | cut -d":" -f2 | grep dpkg-deb > /dev/null
|
||||||
|
|
|
@ -42,7 +42,7 @@ my $Sem = undef;
|
||||||
my $ThreadSem = undef;
|
my $ThreadSem = undef;
|
||||||
|
|
||||||
use constant AGENT_VERSION => '7.0NG.732';
|
use constant AGENT_VERSION => '7.0NG.732';
|
||||||
use constant AGENT_BUILD => '190305';
|
use constant AGENT_BUILD => '190306';
|
||||||
|
|
||||||
# Agent log default file size maximum and instances
|
# Agent log default file size maximum and instances
|
||||||
use constant DEFAULT_MAX_LOG_SIZE => 600000;
|
use constant DEFAULT_MAX_LOG_SIZE => 600000;
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
#
|
#
|
||||||
%define name pandorafms_agent_unix
|
%define name pandorafms_agent_unix
|
||||||
%define version 7.0NG.732
|
%define version 7.0NG.732
|
||||||
%define release 190305
|
%define release 190306
|
||||||
|
|
||||||
Summary: Pandora FMS Linux agent, PERL version
|
Summary: Pandora FMS Linux agent, PERL version
|
||||||
Name: %{name}
|
Name: %{name}
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
#
|
#
|
||||||
%define name pandorafms_agent_unix
|
%define name pandorafms_agent_unix
|
||||||
%define version 7.0NG.732
|
%define version 7.0NG.732
|
||||||
%define release 190305
|
%define release 190306
|
||||||
|
|
||||||
Summary: Pandora FMS Linux agent, PERL version
|
Summary: Pandora FMS Linux agent, PERL version
|
||||||
Name: %{name}
|
Name: %{name}
|
||||||
|
|
|
@ -10,7 +10,7 @@
|
||||||
# **********************************************************************
|
# **********************************************************************
|
||||||
|
|
||||||
PI_VERSION="7.0NG.732"
|
PI_VERSION="7.0NG.732"
|
||||||
PI_BUILD="190305"
|
PI_BUILD="190306"
|
||||||
OS_NAME=`uname -s`
|
OS_NAME=`uname -s`
|
||||||
|
|
||||||
FORCE=0
|
FORCE=0
|
||||||
|
|
|
@ -186,7 +186,7 @@ UpgradeApplicationID
|
||||||
{}
|
{}
|
||||||
|
|
||||||
Version
|
Version
|
||||||
{190305}
|
{190306}
|
||||||
|
|
||||||
ViewReadme
|
ViewReadme
|
||||||
{Yes}
|
{Yes}
|
||||||
|
|
|
@ -30,7 +30,7 @@ using namespace Pandora;
|
||||||
using namespace Pandora_Strutils;
|
using namespace Pandora_Strutils;
|
||||||
|
|
||||||
#define PATH_SIZE _MAX_PATH+1
|
#define PATH_SIZE _MAX_PATH+1
|
||||||
#define PANDORA_VERSION ("7.0NG.732(Build 190305)")
|
#define PANDORA_VERSION ("7.0NG.732(Build 190306)")
|
||||||
|
|
||||||
string pandora_path;
|
string pandora_path;
|
||||||
string pandora_dir;
|
string pandora_dir;
|
||||||
|
|
|
@ -11,7 +11,7 @@ BEGIN
|
||||||
VALUE "LegalCopyright", "Artica ST"
|
VALUE "LegalCopyright", "Artica ST"
|
||||||
VALUE "OriginalFilename", "PandoraAgent.exe"
|
VALUE "OriginalFilename", "PandoraAgent.exe"
|
||||||
VALUE "ProductName", "Pandora FMS Windows Agent"
|
VALUE "ProductName", "Pandora FMS Windows Agent"
|
||||||
VALUE "ProductVersion", "(7.0NG.732(Build 190305))"
|
VALUE "ProductVersion", "(7.0NG.732(Build 190306))"
|
||||||
VALUE "FileVersion", "1.0.0.0"
|
VALUE "FileVersion", "1.0.0.0"
|
||||||
END
|
END
|
||||||
END
|
END
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
package: pandorafms-console
|
package: pandorafms-console
|
||||||
Version: 7.0NG.732-190305
|
Version: 7.0NG.732-190306
|
||||||
Architecture: all
|
Architecture: all
|
||||||
Priority: optional
|
Priority: optional
|
||||||
Section: admin
|
Section: admin
|
||||||
|
|
|
@ -14,7 +14,7 @@
|
||||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
# GNU General Public License for more details.
|
# GNU General Public License for more details.
|
||||||
|
|
||||||
pandora_version="7.0NG.732-190305"
|
pandora_version="7.0NG.732-190306"
|
||||||
|
|
||||||
package_pear=0
|
package_pear=0
|
||||||
package_pandora=1
|
package_pandora=1
|
||||||
|
|
|
@ -0,0 +1,113 @@
|
||||||
|
<html>
|
||||||
|
<head>
|
||||||
|
|
||||||
|
<style>
|
||||||
|
|
||||||
|
#alert_messages_na{
|
||||||
|
-moz-border-bottom-right-radius: 5px;
|
||||||
|
-webkit-border-bottom-left-radius: 5px;
|
||||||
|
border-bottom-right-radius: 5px;
|
||||||
|
border-bottom-left-radius: 5px;
|
||||||
|
z-index:2;
|
||||||
|
position:fixed;
|
||||||
|
width:700px;
|
||||||
|
background:white;
|
||||||
|
left:50%;
|
||||||
|
top:20%;
|
||||||
|
margin-left:-350px;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
.modalheade{
|
||||||
|
text-align:center;
|
||||||
|
width:100%;
|
||||||
|
height:37px;
|
||||||
|
left:0px;
|
||||||
|
background-color:#82b92e;
|
||||||
|
}
|
||||||
|
.modalheadertex{
|
||||||
|
color:white;
|
||||||
|
position:relative;
|
||||||
|
font-family:Nunito;
|
||||||
|
font-size:13pt;
|
||||||
|
top:8px;
|
||||||
|
}
|
||||||
|
|
||||||
|
.modalconten{
|
||||||
|
color:black;
|
||||||
|
background:white;
|
||||||
|
}
|
||||||
|
.modalcontentim{
|
||||||
|
float:left;
|
||||||
|
margin-left:30px;
|
||||||
|
margin-top:30px;
|
||||||
|
margin-bottom:30px;
|
||||||
|
}
|
||||||
|
.modalcontenttex{
|
||||||
|
float:left;
|
||||||
|
text-align:justify;
|
||||||
|
color:black;
|
||||||
|
font-size: 9.5pt;
|
||||||
|
line-height:13pt;
|
||||||
|
margin-top:40px;
|
||||||
|
width:430px;
|
||||||
|
margin-left:30px;
|
||||||
|
}
|
||||||
|
.modalwikibutto{
|
||||||
|
cursor:pointer;
|
||||||
|
text-align:center;
|
||||||
|
margin-right:45px;
|
||||||
|
float:right;
|
||||||
|
-moz-border-radius: 3px;
|
||||||
|
-webkit-border-radius: 3px;
|
||||||
|
margin-bottom:30px;
|
||||||
|
border-radius: 3px;
|
||||||
|
width:170px;
|
||||||
|
height:30px;
|
||||||
|
border: 1px solid #82b92e;
|
||||||
|
margin-top:8%;
|
||||||
|
background-color:#82b92e;
|
||||||
|
}
|
||||||
|
.modalwikibuttontex{
|
||||||
|
color:#ffffff;
|
||||||
|
font-family:Nunito;
|
||||||
|
font-size:10pt;
|
||||||
|
position:relative;
|
||||||
|
top:6px;
|
||||||
|
}
|
||||||
|
|
||||||
|
#opacity{
|
||||||
|
background:black;opacity:0.1;left:0px;top:0px;width:100%;height:100%;
|
||||||
|
}
|
||||||
|
|
||||||
|
</style>
|
||||||
|
</head>
|
||||||
|
<body>
|
||||||
|
|
||||||
|
<div id="alert_messages_na">
|
||||||
|
|
||||||
|
<div class='modalheade'>
|
||||||
|
<span class='modalheadertex'>
|
||||||
|
<?php echo __('Database error'); ?>
|
||||||
|
</span>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class='modalconten'>
|
||||||
|
<img class='modalcontentim' src='<?php echo $config['homeurl']; ?>/images/mysqlerr.png'>
|
||||||
|
<div class='modalcontenttex'>
|
||||||
|
<?php
|
||||||
|
echo __('Failure to connect to Database server, please check the configuration file config.php or contact system administrator if you need assistance.');
|
||||||
|
?>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
<a href='https://wiki.pandorafms.com/index.php?title=Pandora:Documentation_en:Configuration' target='_blank'>
|
||||||
|
<div class='modalwikibutto cerrar'>
|
||||||
|
<span class='modalwikibuttontex'> <?php echo __('Documentation'); ?></span>
|
||||||
|
</div>
|
||||||
|
</a>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div id="opacity"></div>
|
||||||
|
|
||||||
|
</body>
|
||||||
|
</html>
|
Binary file not shown.
After Width: | Height: | Size: 3.4 KiB |
|
@ -20,7 +20,7 @@
|
||||||
/**
|
/**
|
||||||
* Pandora build version and version
|
* Pandora build version and version
|
||||||
*/
|
*/
|
||||||
$build_version = 'PC190305';
|
$build_version = 'PC190306';
|
||||||
$pandora_version = 'v7.0NG.732';
|
$pandora_version = 'v7.0NG.732';
|
||||||
|
|
||||||
// Do not overwrite default timezone set if defined.
|
// Do not overwrite default timezone set if defined.
|
||||||
|
|
|
@ -45,6 +45,7 @@ function mysql_connect_db($host=null, $db=null, $user=null, $pass=null, $port=nu
|
||||||
if ($config['mysqli']) {
|
if ($config['mysqli']) {
|
||||||
$connect_id = mysqli_connect($host, $user, $pass, $db, $port);
|
$connect_id = mysqli_connect($host, $user, $pass, $db, $port);
|
||||||
if (mysqli_connect_errno() > 0) {
|
if (mysqli_connect_errno() > 0) {
|
||||||
|
include 'general/mysqlerr.php';
|
||||||
return false;
|
return false;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -534,9 +534,10 @@ function planned_downtimes_migrate_malformed_downtimes_copy_items($original_down
|
||||||
/**
|
/**
|
||||||
* Stop a planned downtime.
|
* Stop a planned downtime.
|
||||||
*
|
*
|
||||||
* @param array Planned downtime data.
|
* @param array $downtime Planned downtime data.
|
||||||
*
|
*
|
||||||
* @return mixes False on error or an array with the result and a message of the operation.
|
* @return mixed False on error or an array with the result and a message of
|
||||||
|
* the operation.
|
||||||
*/
|
*/
|
||||||
function planned_downtimes_stop($downtime)
|
function planned_downtimes_stop($downtime)
|
||||||
{
|
{
|
||||||
|
@ -566,6 +567,8 @@ function planned_downtimes_stop($downtime)
|
||||||
case 'periodically':
|
case 'periodically':
|
||||||
return false;
|
return false;
|
||||||
|
|
||||||
|
default:
|
||||||
|
// Nothing to do.
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -593,7 +596,7 @@ function planned_downtimes_stop($downtime)
|
||||||
true
|
true
|
||||||
);
|
);
|
||||||
|
|
||||||
// Reenabled the Agents or Modules or alerts...depends of type
|
// Reenabled the Agents or Modules or alerts...depends of type.
|
||||||
switch ($downtime['type_downtime']) {
|
switch ($downtime['type_downtime']) {
|
||||||
case 'quiet':
|
case 'quiet':
|
||||||
$agents = db_get_all_rows_filter(
|
$agents = db_get_all_rows_filter(
|
||||||
|
@ -658,7 +661,10 @@ function planned_downtimes_stop($downtime)
|
||||||
foreach ($agents as $agent) {
|
foreach ($agents as $agent) {
|
||||||
$result = db_process_sql_update(
|
$result = db_process_sql_update(
|
||||||
'tagente',
|
'tagente',
|
||||||
['disabled' => 0],
|
[
|
||||||
|
'disabled' => 0,
|
||||||
|
'update_module_count' => 1,
|
||||||
|
],
|
||||||
['id_agente' => $agent['id_agent']]
|
['id_agente' => $agent['id_agent']]
|
||||||
);
|
);
|
||||||
|
|
||||||
|
@ -702,6 +708,10 @@ function planned_downtimes_stop($downtime)
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
|
default:
|
||||||
|
// Nothing to do.
|
||||||
|
break;
|
||||||
}
|
}
|
||||||
|
|
||||||
$message .= ui_print_info_message(
|
$message .= ui_print_info_message(
|
||||||
|
|
|
@ -748,7 +748,7 @@ function flot_slicesbar_graph(
|
||||||
if ($widgets) {
|
if ($widgets) {
|
||||||
$return = "<div id='$graph_id' class='noresizevc graph $adapt_key' style='width: ".$width.'px; height: '.$height."px;'></div>";
|
$return = "<div id='$graph_id' class='noresizevc graph $adapt_key' style='width: ".$width.'px; height: '.$height."px;'></div>";
|
||||||
} else {
|
} else {
|
||||||
$return = "<div id='$graph_id' class='noresizevc graph $adapt_key' style='width: ".$width.'%; height: '.$height."px;'></div>";
|
$return = "<div id='$graph_id' class='noresizevc graph $adapt_key' style='width: ".$width.'px; height: '.$height."px;'></div>";
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
#
|
#
|
||||||
%define name pandorafms_console
|
%define name pandorafms_console
|
||||||
%define version 7.0NG.732
|
%define version 7.0NG.732
|
||||||
%define release 190305
|
%define release 190306
|
||||||
|
|
||||||
# User and Group under which Apache is running
|
# User and Group under which Apache is running
|
||||||
%define httpd_name httpd
|
%define httpd_name httpd
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
#
|
#
|
||||||
%define name pandorafms_console
|
%define name pandorafms_console
|
||||||
%define version 7.0NG.732
|
%define version 7.0NG.732
|
||||||
%define release 190305
|
%define release 190306
|
||||||
%define httpd_name httpd
|
%define httpd_name httpd
|
||||||
# User and Group under which Apache is running
|
# User and Group under which Apache is running
|
||||||
%define httpd_name apache2
|
%define httpd_name apache2
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
package: pandorafms-server
|
package: pandorafms-server
|
||||||
Version: 7.0NG.732-190305
|
Version: 7.0NG.732-190306
|
||||||
Architecture: all
|
Architecture: all
|
||||||
Priority: optional
|
Priority: optional
|
||||||
Section: admin
|
Section: admin
|
||||||
|
|
|
@ -14,7 +14,7 @@
|
||||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
# GNU General Public License for more details.
|
# GNU General Public License for more details.
|
||||||
|
|
||||||
pandora_version="7.0NG.732-190305"
|
pandora_version="7.0NG.732-190306"
|
||||||
|
|
||||||
package_cpan=0
|
package_cpan=0
|
||||||
package_pandora=1
|
package_pandora=1
|
||||||
|
|
|
@ -306,7 +306,7 @@ sub pandora_server_tasks ($) {
|
||||||
if (($counter % 30) == 0) {
|
if (($counter % 30) == 0) {
|
||||||
|
|
||||||
# Update module status and fired alert counts
|
# Update module status and fired alert counts
|
||||||
my @agents = get_db_rows ($dbh, 'SELECT id_agente, nombre, update_module_count, update_alert_count, update_secondary_groups FROM tagente WHERE disabled = 0 AND (update_module_count=1 OR update_alert_count=1 OR update_secondary_groups=1)');
|
my @agents = get_db_rows ($dbh, 'SELECT id_agente, nombre, update_module_count, update_alert_count, update_secondary_groups FROM tagente WHERE (update_module_count=1 OR update_alert_count=1 OR update_secondary_groups=1)');
|
||||||
foreach my $agent (@agents) {
|
foreach my $agent (@agents) {
|
||||||
logger ($pa_config, "Updating module status and fired alert counts for agent " . $agent->{'nombre'}, 10);
|
logger ($pa_config, "Updating module status and fired alert counts for agent " . $agent->{'nombre'}, 10);
|
||||||
|
|
||||||
|
|
|
@ -45,7 +45,7 @@ our @EXPORT = qw(
|
||||||
|
|
||||||
# version: Defines actual version of Pandora Server for this module only
|
# version: Defines actual version of Pandora Server for this module only
|
||||||
my $pandora_version = "7.0NG.732";
|
my $pandora_version = "7.0NG.732";
|
||||||
my $pandora_build = "190305";
|
my $pandora_build = "190306";
|
||||||
our $VERSION = $pandora_version." ".$pandora_build;
|
our $VERSION = $pandora_version." ".$pandora_build;
|
||||||
|
|
||||||
# Setup hash
|
# Setup hash
|
||||||
|
|
|
@ -1820,7 +1820,8 @@ sub pandora_planned_downtime_set_disabled_elements($$$) {
|
||||||
WHERE tp.id_agent = ta.id_agente AND tp.id_downtime = ?',$downtime->{'id'});
|
WHERE tp.id_agent = ta.id_agente AND tp.id_downtime = ?',$downtime->{'id'});
|
||||||
|
|
||||||
db_do($dbh,'UPDATE tagente ta, tplanned_downtime_agents tpa
|
db_do($dbh,'UPDATE tagente ta, tplanned_downtime_agents tpa
|
||||||
SET ta.disabled = 1 WHERE tpa.id_agent = ta.id_agente AND
|
SET ta.disabled = 1, ta.update_module_count = 1
|
||||||
|
WHERE tpa.id_agent = ta.id_agente AND
|
||||||
tpa.id_downtime = ?',$downtime->{'id'});
|
tpa.id_downtime = ?',$downtime->{'id'});
|
||||||
|
|
||||||
} else {
|
} else {
|
||||||
|
@ -1857,7 +1858,8 @@ sub pandora_planned_downtime_unset_disabled_elements($$$) {
|
||||||
|
|
||||||
if ($only_alerts == 0) {
|
if ($only_alerts == 0) {
|
||||||
db_do($dbh,'UPDATE tagente ta, tplanned_downtime_agents tpa
|
db_do($dbh,'UPDATE tagente ta, tplanned_downtime_agents tpa
|
||||||
set ta.disabled = 0 WHERE tpa.id_agent = ta.id_agente AND
|
set ta.disabled = 0, ta.update_module_count = 1
|
||||||
|
WHERE tpa.id_agent = ta.id_agente AND
|
||||||
tpa.manually_disabled = 0 AND tpa.id_downtime = ?',$downtime->{'id'});
|
tpa.manually_disabled = 0 AND tpa.id_downtime = ?',$downtime->{'id'});
|
||||||
} else {
|
} else {
|
||||||
my @downtime_agents = get_db_rows($dbh, 'SELECT *
|
my @downtime_agents = get_db_rows($dbh, 'SELECT *
|
||||||
|
|
|
@ -32,7 +32,7 @@ our @ISA = qw(Exporter);
|
||||||
|
|
||||||
# version: Defines actual version of Pandora Server for this module only
|
# version: Defines actual version of Pandora Server for this module only
|
||||||
my $pandora_version = "7.0NG.732";
|
my $pandora_version = "7.0NG.732";
|
||||||
my $pandora_build = "190305";
|
my $pandora_build = "190306";
|
||||||
our $VERSION = $pandora_version." ".$pandora_build;
|
our $VERSION = $pandora_version." ".$pandora_build;
|
||||||
|
|
||||||
our %EXPORT_TAGS = ( 'all' => [ qw() ] );
|
our %EXPORT_TAGS = ( 'all' => [ qw() ] );
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
#
|
#
|
||||||
%define name pandorafms_server
|
%define name pandorafms_server
|
||||||
%define version 7.0NG.732
|
%define version 7.0NG.732
|
||||||
%define release 190305
|
%define release 190306
|
||||||
|
|
||||||
Summary: Pandora FMS Server
|
Summary: Pandora FMS Server
|
||||||
Name: %{name}
|
Name: %{name}
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
#
|
#
|
||||||
%define name pandorafms_server
|
%define name pandorafms_server
|
||||||
%define version 7.0NG.732
|
%define version 7.0NG.732
|
||||||
%define release 190305
|
%define release 190306
|
||||||
|
|
||||||
Summary: Pandora FMS Server
|
Summary: Pandora FMS Server
|
||||||
Name: %{name}
|
Name: %{name}
|
||||||
|
|
|
@ -9,7 +9,7 @@
|
||||||
# **********************************************************************
|
# **********************************************************************
|
||||||
|
|
||||||
PI_VERSION="7.0NG.732"
|
PI_VERSION="7.0NG.732"
|
||||||
PI_BUILD="190305"
|
PI_BUILD="190306"
|
||||||
|
|
||||||
MODE=$1
|
MODE=$1
|
||||||
if [ $# -gt 1 ]; then
|
if [ $# -gt 1 ]; then
|
||||||
|
|
|
@ -34,7 +34,7 @@ use PandoraFMS::Config;
|
||||||
use PandoraFMS::DB;
|
use PandoraFMS::DB;
|
||||||
|
|
||||||
# version: define current version
|
# version: define current version
|
||||||
my $version = "7.0NG.732 PS190305";
|
my $version = "7.0NG.732 PS190306";
|
||||||
|
|
||||||
# Pandora server configuration
|
# Pandora server configuration
|
||||||
my %conf;
|
my %conf;
|
||||||
|
|
|
@ -36,7 +36,7 @@ use Encode::Locale;
|
||||||
Encode::Locale::decode_argv;
|
Encode::Locale::decode_argv;
|
||||||
|
|
||||||
# version: define current version
|
# version: define current version
|
||||||
my $version = "7.0NG.732 PS190305";
|
my $version = "7.0NG.732 PS190306";
|
||||||
|
|
||||||
# save program name for logging
|
# save program name for logging
|
||||||
my $progname = basename($0);
|
my $progname = basename($0);
|
||||||
|
|
Loading…
Reference in New Issue