Select Code to Download

Select or download this

use strict;
use warnings;
...
say 'start mymain';
my $answ = Mymoddir::Mymod::mysub('hello');
say "mysub returned: $answ";

Select or download this

use strict;
use warnings;
...
    say 'mysub got: ', shift;
    return 'thanks';
}

Select or download this

build_distrib\Mydistro\script\mymain.pl
build_distrib\Mydistro\lib\Mymoddir\Mymod.pm
build_distrib\Build.PL

Select or download this

use 5.006;
use strict;
...
    add_to_cleanup      => [ "$distro-*" ],
    create_makefile_pl  => 'traditional',
);

Select or download this

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.

Select or download this

Build.PL
MANIFEST            This list of files
...
Makefile.PL
META.yml
META.json

Select or download this
```
%tmp%\sudo\inst_mat
```

Select or download this

cd /d %tmp%\sudo\inst_mat\Mydistro-0.000_001
perl Build.PL --destdir ..\..\sudodir verbose=1
Build
Build install

Select or download this

%tmp%\sudo\sudodir\strawberry5.14\perl\site\lib\auto\Mydistro\lib\Mymo
+ddir\Mymod\.packlist