+++ /dev/null
-use strict;
-use lib 't/usage';
-use Test::More skip_all => "Needs lameness in user code";
-
-# my $caller = caller;
-#
-# This won't work unless the subs are predeclared before the C<use> statement
-# # Handle import tags
-# if (@_ == 1) {
-# if ($_[0] ne ":import") {
-# require Carp;
-# Carp::croak("Unknown tag '$_[0]'");
-# }
-#
-# # We have :import, generate import and unimport methods in the
-# # calling package
-# my %pkg;
-# for (qw(comp exec)) {
-# no strict 'refs';
-# $pkg{$_} = *{"$caller\::$_"}{CODE} if *{"$caller\::$_"}{CODE};
-# }
-#
-# use Data::Dumper;
-# warn Dumper \%pkg;
-#
-# no strict 'refs';
-# *{"$caller\::import"} = sub {
-# __PACKAGE__->import(%pkg);
-# };
-# *{"$caller\::unimport"} = \&unimport;
-#
-# return;
-# }
-#
-
-use import;
-
-"ook" =~ /pattern/;
-
-is($1, "ook_1");