Select Code to Download

package My::Cunning::Module;
use Modern::Perl;
use Exporter qw/import/; 
...
    ...
}
1;

use Modern::Perl;
use My::Cunning::Module qw/looper/;

# somewhere in your program
looper($data) or die 'It did not work';