Changeset 397
- Timestamp:
- Feb 28, 2018, 7:53:47 PM (6 years ago)
- File:
-
- 1 edited
-
trunk/klask (modified) (18 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/klask
r396 r397 1271 1271 #--------------------------------------------------------------- 1272 1272 sub cmd_searchdb { 1273 my@ARGV = @_;1273 local @ARGV = @_; 1274 1274 1275 1275 my $kind; … … 1578 1578 #--------------------------------------------------------------- 1579 1579 sub cmd_insertdb { 1580 my@ARGV = @_;1580 local @ARGV = @_; 1581 1581 1582 1582 my ($ip, $mac, $net); … … 1657 1657 #--------------------------------------------------------------- 1658 1658 sub cmd_cleandb { 1659 my@ARGV = @_;1659 local @ARGV = @_; 1660 1660 1661 1661 my $days_to_clean = 15; … … 1767 1767 #--------------------------------------------------------------- 1768 1768 sub cmd_exportdb { 1769 @ARGV = @_;1769 local @ARGV = @_; 1770 1770 1771 1771 my $format = 'txt'; … … 2132 2132 #--------------------------------------------------------------- 2133 2133 sub cmd_bad_vlan_id { 2134 @ARGV = @_;2134 local @ARGV = @_; 2135 2135 2136 2136 my $days_before_alert = $DEFAULT{'days-before-alert'} || 15; … … 2358 2358 #--------------------------------------------------------------- 2359 2359 sub cmd_poe_enable { 2360 @ARGV = @_;2360 local @ARGV = @_; 2361 2361 2362 2362 my $verbose; … … 2396 2396 #--------------------------------------------------------------- 2397 2397 sub cmd_poe_disable { 2398 @ARGV = @_;2398 local @ARGV = @_; 2399 2399 2400 2400 my $verbose; … … 2434 2434 #--------------------------------------------------------------- 2435 2435 sub cmd_poe_status { 2436 @ARGV = @_;2436 local @ARGV = @_; 2437 2437 2438 2438 my $verbose; … … 2480 2480 #--------------------------------------------------------------- 2481 2481 sub cmd_host_setlocation { 2482 @ARGV = @_;2482 local @ARGV = @_; 2483 2483 2484 2484 my ($verbose, $force); … … 2567 2567 #--------------------------------------------------------------- 2568 2568 sub cmd_port_getvlan { 2569 @ARGV = @_;2569 local @ARGV = @_; 2570 2570 2571 2571 my $verbose; … … 2616 2616 # snmpset -v 1 -c public sw1-batG0-legi.hmg.priv "$OID_NUMBER{'HPicfReset'}.0" i 2; 2617 2617 sub cmd_rebootsw { 2618 @ARGV = @_;2618 local @ARGV = @_; 2619 2619 2620 2620 my $verbose; … … 2743 2743 #--------------------------------------------------------------- 2744 2744 sub cmd_ip_free { 2745 @ARGV = @_;2745 local @ARGV = @_; 2746 2746 2747 2747 my $days_to_death = $DEFAULT{'days-to-death'} || 365 * 2; … … 2904 2904 #--------------------------------------------------------------- 2905 2905 sub cmd_enable { 2906 @ARGV = @_;2906 local @ARGV = @_; 2907 2907 2908 2908 my $verbose; … … 2949 2949 #--------------------------------------------------------------- 2950 2950 sub cmd_disable { 2951 @ARGV = @_;2951 local @ARGV = @_; 2952 2952 2953 2953 my $verbose; … … 2992 2992 #--------------------------------------------------------------- 2993 2993 sub cmd_status { 2994 @ARGV = @_;2994 local @ARGV = @_; 2995 2995 2996 2996 my $verbose; … … 3038 3038 #--------------------------------------------------------------- 3039 3039 sub cmd_search_mac_on_switch { 3040 @ARGV = @_;3040 local @ARGV = @_; 3041 3041 3042 3042 my $verbose; … … 3098 3098 #--------------------------------------------------------------- 3099 3099 sub cmd_updatesw { 3100 @ARGV = @_;3100 local @ARGV = @_; 3101 3101 3102 3102 my $verbose; … … 3111 3111 #--------------------------------------------------------------- 3112 3112 sub cmd_exportsw { 3113 @ARGV = @_;3113 local @ARGV = @_; 3114 3114 3115 3115 test_switchdb_environnement();
Note: See TracChangeset
for help on using the changeset viewer.
