Select Code to Download

BEGIN {
  eval "require CGI::Simple; CGI::Simple->import;"
...
     $main::q = CGI::Simple->new;
  }
}

  use Module::prefer 'prefer';
  # use CGI::Simple if possible, CGI otherwise
...
      'CGI'         => [1],
    ],
  );

  $chosen = prefer( \@modspec, @default_args );

  [ 'Module::Name' => [ $use_default_args, @special_args ], ... ]

  # 'bar' in default, special args for Module::A
  $chosen = prefer (
...
    'bar',
  );

  # 'foo' and 'bar' in default, Module::B does it's own thing
  $chosen = prefer (
...
    'foo', 'bar',
  );

package Module::Prefer;
use strict;
...
  );

=cut