#!/usr/bin/perl

use Foo 'x';   # x() will be imported from Bar into Foo namespace
               # (as would be done when using a hardcoded "use Bar 'x'" within Foo)

Foo::x('bla');

__END__
$ ./824136.pl
Foo::import(): Foo x
x(): bla