#-#############################################   package SysConfig; #-############################################# # Use-Section #-#############################################    use strict;    use warnings;     #-############################################# # Setup-Section #-#############################################    our ($config, $io);     #-############################################# sub new { #-#############################################    my $invoc = shift;    my $class = ref $invoc || $invoc;    my $self = {};        ($config, $io) = @{shift()};        bless $self, $class;    return $self; }