Changeset 397 for trunk


Ignore:
Timestamp:
Feb 28, 2018, 7:53:47 PM (7 years ago)
Author:
g7moreau
Message:
  • Force @ARGV to be local
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/klask

    r396 r397  
    12711271#---------------------------------------------------------------
    12721272sub cmd_searchdb {
    1273    my @ARGV = @_;
     1273   local @ARGV = @_;
    12741274
    12751275   my $kind;
    … …  
    15781578#---------------------------------------------------------------
    15791579sub cmd_insertdb {
    1580    my @ARGV = @_;
     1580   local @ARGV = @_;
    15811581
    15821582   my ($ip, $mac, $net);
    … …  
    16571657#---------------------------------------------------------------
    16581658sub cmd_cleandb {
    1659    my @ARGV = @_;
     1659   local @ARGV = @_;
    16601660
    16611661   my $days_to_clean = 15;
    … …  
    17671767#---------------------------------------------------------------
    17681768sub cmd_exportdb {
    1769    @ARGV = @_;
     1769   local @ARGV = @_;
    17701770
    17711771   my $format = 'txt';
    … …  
    21322132#---------------------------------------------------------------
    21332133sub cmd_bad_vlan_id {
    2134    @ARGV = @_;
     2134   local @ARGV = @_;
    21352135
    21362136   my $days_before_alert = $DEFAULT{'days-before-alert'} || 15;
    … …  
    23582358#---------------------------------------------------------------
    23592359sub cmd_poe_enable {
    2360    @ARGV = @_;
     2360   local @ARGV = @_;
    23612361
    23622362   my $verbose;
    … …  
    23962396#---------------------------------------------------------------
    23972397sub cmd_poe_disable {
    2398    @ARGV = @_;
     2398   local @ARGV = @_;
    23992399
    24002400   my $verbose;
    … …  
    24342434#---------------------------------------------------------------
    24352435sub cmd_poe_status {
    2436    @ARGV = @_;
     2436   local @ARGV = @_;
    24372437
    24382438   my $verbose;
    … …  
    24802480#---------------------------------------------------------------
    24812481sub cmd_host_setlocation {
    2482    @ARGV = @_;
     2482   local @ARGV = @_;
    24832483
    24842484   my ($verbose, $force);
    … …  
    25672567#---------------------------------------------------------------
    25682568sub cmd_port_getvlan {
    2569    @ARGV = @_;
     2569   local @ARGV = @_;
    25702570
    25712571   my $verbose;
    … …  
    26162616# snmpset -v 1 -c public sw1-batG0-legi.hmg.priv "$OID_NUMBER{'HPicfReset'}.0" i 2;
    26172617sub cmd_rebootsw {
    2618    @ARGV = @_;
     2618   local @ARGV = @_;
    26192619
    26202620   my $verbose;
    … …  
    27432743#---------------------------------------------------------------
    27442744sub cmd_ip_free {
    2745    @ARGV = @_;
     2745   local @ARGV = @_;
    27462746
    27472747   my $days_to_death = $DEFAULT{'days-to-death'} || 365 * 2;
    … …  
    29042904#---------------------------------------------------------------
    29052905sub cmd_enable {
    2906    @ARGV = @_;
     2906   local @ARGV = @_;
    29072907
    29082908   my $verbose;
    … …  
    29492949#---------------------------------------------------------------
    29502950sub cmd_disable {
    2951    @ARGV = @_;
     2951   local @ARGV = @_;
    29522952
    29532953   my $verbose;
    … …  
    29922992#---------------------------------------------------------------
    29932993sub cmd_status {
    2994    @ARGV = @_;
     2994   local @ARGV = @_;
    29952995
    29962996   my $verbose;
    … …  
    30383038#---------------------------------------------------------------
    30393039sub cmd_search_mac_on_switch {
    3040    @ARGV = @_;
     3040   local @ARGV = @_;
    30413041
    30423042   my $verbose;
    … …  
    30983098#---------------------------------------------------------------
    30993099sub cmd_updatesw {
    3100    @ARGV = @_;
     3100   local @ARGV = @_;
    31013101
    31023102   my $verbose;
    … …  
    31113111#---------------------------------------------------------------
    31123112sub cmd_exportsw {
    3113    @ARGV = @_;
     3113   local @ARGV = @_;
    31143114
    31153115   test_switchdb_environnement();
Note: See TracChangeset for help on using the changeset viewer.