Permalink
Fetching contributors…
Cannot retrieve contributors at this time
executable file 22 lines (18 sloc) 426 Bytes
#!/usr/bin/env perl
use strict;
use App::FatPacker ();
use File::Path;
use Cwd;
my $modules = [ split /\s+/, <<MODULES ];
CPAN/DistnameInfo.pm
HTTP/Tiny.pm
local/lib.pm
version.pm
Module/Metadata.pm
Parse/CPAN/Meta.pm
MODULES
my $packer = App::FatPacker->new;
my @packlists = $packer->packlists_containing($modules);
$packer->packlists_to_tree(cwd . "/fatlib", \@packlists);
use Config;
rmtree("fatlib/$Config{archname}");