diff options
Diffstat (limited to 'perl-install/modparm.pm')
-rw-r--r-- | perl-install/modparm.pm | 18 |
1 files changed, 13 insertions, 5 deletions
diff --git a/perl-install/modparm.pm b/perl-install/modparm.pm index cc7b0efb4..438b79dcd 100644 --- a/perl-install/modparm.pm +++ b/perl-install/modparm.pm @@ -3,12 +3,21 @@ package modparm; use diagnostics; use strict; +#-###################################################################################### +#- misc imports +#-###################################################################################### use common qw(:common :functional); use log; +#-##################################################################################### +#- Globals +#-##################################################################################### my %modparm_hash; +#-###################################################################################### +#- Functions +#-###################################################################################### sub read_modparm_file($) { my ($file) = @_; my @line; @@ -50,8 +59,7 @@ sub get_options_name($) { @names; } -if ($::testing) { - read_modparm_file("/tmp/modparm.txt"); -} - -1; +#-###################################################################################### +#- Wonderful perl :( +#-###################################################################################### +1; # |