#!/usr/bin/perl -w

use MGO;
use Getopt::Long;

GetOptions('help'    => \ (my $help),
	   'version' => \ (my $version),
	  );

print "HELP : $help\n" if(defined $help);
print "VERS.: $version\n" if(defined $version);

##</code><code>##

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;