The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Filter::Simple::ImportTest;

use base 'Exporter';
@EXPORT = qw(say);

sub say { print @_ }

use Filter::Simple;

sub import {
	my $class = shift;
	print "ok $_\n" foreach @_;
	__PACKAGE__->export_to_level(1,$class);
}

FILTER { s/not // };


1;