Select Code to Download

sub help { # print basic help menu and exit.
  print "vpimport\n";
...

  exit(0);
}

sub version { #print version number and exit
  print "$VERSION\n";
  exit(0);
}

my $result = GetOptions
  (
...
   "live" => \$useLive, # Are we using the live database?
   "no-create" => \$no_create, # Don't create new items.
  );