Perl GetOpt::Long Boilerplate

GetOpt.pl

use Getopt::Long qw(
  :config
  auto_help
  auto_version
  no_ignore_case
  bundling
);

my %options;
Getopt::Long::GetOptions(
  'user|u=s'     => \$options{user},
  'host|h=s'     => \$options{host},
);