use vars::i qw[ @EXPORT_OK  foo ];