use strict; use warnings; use feature 'say'; use Mymoddir::Mymod; our $VERSION = v0.0.1; say 'start mymain'; my $answ = Mymoddir::Mymod::mysub('hello'); say "mysub returned: $answ"; #### use strict; use warnings; use feature 'say'; package Mymoddir::Mymod; our $VERSION = v0.0.1; sub mysub { say 'mysub got: ', shift; return 'thanks'; } #### build_distrib\Mydistro\script\mymain.pl build_distrib\Mydistro\lib\Mymoddir\Mymod.pm build_distrib\Build.PL #### use 5.006; use strict; use warnings; use Module::Build; my $distro = 'Mydistro'; # Name of Distribution my $builder = Module::Build->new( dist_name => "$distro", dist_version => '0.000_001', module_name => "$distro/lib/Mymoddir/Mymod", license => 'perl', dist_author => q{GUIfriend}, dist_abstract => 'Greetings', build_requires => { 'Test::More' => 0, }, requires => { 'perl' => 5.006, }, add_to_cleanup => [ "$distro-*" ], create_makefile_pl => 'traditional', ); #### No 'module_name' was provided and it could not be inferred from other properties. This will prevent a packlist from being written for this file. Please set either 'module_name' or 'dist_version_from' in Build.PL. #### Build.PL MANIFEST This list of files Mydistro/lib/Mymoddir/Mymod.pm Mydistro/script/mymain.pl Makefile.PL META.yml META.json #### %tmp%\sudo\inst_mat #### cd /d %tmp%\sudo\inst_mat\Mydistro-0.000_001 perl Build.PL --destdir ..\..\sudodir verbose=1 Build Build install #### %tmp%\sudo\sudodir\strawberry5.14\perl\site\lib\auto\Mydistro\lib\Mymoddir\Mymod\.packlist