package Foo; use Exporter::Tidy _map => { '$foo' => \my $foo }; $foo = 3;