my @files;
find({
- wanted => sub { push @files, $_ if -f $_ && !/Squirrel/ },
+ wanted => sub { push @files, $_ if -f $_ && !/Squirrel|MouseX|\.sw[po]$/ },
no_chdir => 1,
}, 'lib');
open my $handle, '>lib/Mouse/Tiny.pm' or die "Can't write lib/Mouse/Tiny.pm: $!";
print { $handle } << 'EOF';
-#!/usr/bin/env perl
# THIS FILE IS AUTOGENERATED!
# if regular Mouse is loaded, bail out