Select Code to Download

our %EXPORT_TAGS = (
     CONSTANTS => [qw(FOO)], # and other constants
);
our @EXPORT_OK;
Exporter::export_ok_tags('CONSTANTS'); # populate the @EXPORT_OK

BEGIN { P->import(':CONSTANTS'); }