use Getopt::Long; use Config::Auto; #use Data::Dumper; my @servers = (); my @commands = (); my @files = (); my $user = $ENV{USER}; my $file = (); my $dest = (); my $help = (); my $config = 0; # 0 not () GetOptions ("user=s" => \$user, "server=s" => \@servers, "command=s" => \@commands, "file=s" =>\$fil +e, "dest=s"=> \$dest, "config" => \$config, "help" => \$help); print "config: \"$config\"\n";