The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;

use lib qw(./lib ./t/lib);

my $err;
BEGIN {
  eval "use UtilExporterSimple qw/askme :us/;";
  $err = $@;
}
use strict;

use Test::More qw/no_plan/;

SKIP: {
  skip $err if $err;
  ok(!defined &first,  'not defined first');
  ok(!defined &min,    'not defined min');
  ok(!defined &minstr, 'not defined minstr');
  ok(!defined &hello, 'not defined hello');
  ok(defined &askme, 'not defined askme');
  ok(defined &hi,    'not defined hi');

  is(askme(), "what you will", 'askme');
  is(hi(), "hi there", 'hi');
}