package Foo;
use strict;
use warnings;
our @EXPORT = do {
  no strict 'refs';
  grep exists &$_ && /[a-z]/, keys %{ __PACKAGE__ . '::'};
};
sub bar;
sub AUTOLOAD {
   our $AUTOLOAD;
   print "AUTOLOADing $AUTOLOAD\n";
}
1;