package MGO; use Getopt::Long; GetOptions('cpu=i' => \ (my $cpu), 'quiet' => \ (my $quiet), ); print "CPU : $cpu\n" if(defined $cpu); print "QUIET: $quiet\n" if(defined $quiet); 1;