iterate over the use-d modules

Hi all,
is there a way to iterate over the used modules, I mean every symbol
loaded with use?
I would like to do something like:

use Foo;
use Bar;

say ${ $_ }::VERSION for ( @used );

and get something like

say $Foo::VERSION;
say $Bar::VERSION;


Thanks,
Luca