package 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;