|
Lines 50-55
my $input = new CGI;
Link Here
|
| 50 |
$debug or $debug = $cgi_debug; |
50 |
$debug or $debug = $cgi_debug; |
| 51 |
my $do_it = $input->param('do_it'); |
51 |
my $do_it = $input->param('do_it'); |
| 52 |
my @modules = $input->multi_param("modules"); |
52 |
my @modules = $input->multi_param("modules"); |
|
|
53 |
use Data::Printer colored => 1; warn p @modules; |
| 53 |
my $user = $input->param("user") // ''; |
54 |
my $user = $input->param("user") // ''; |
| 54 |
my @actions = $input->multi_param("actions"); |
55 |
my @actions = $input->multi_param("actions"); |
| 55 |
my @interfaces = $input->multi_param("interfaces"); |
56 |
my @interfaces = $input->multi_param("interfaces"); |
| 56 |
- |
|
|