niner · December 15, 2016 19:21
diff --git a/module-source.pl b/module-source.pl
 #!/usr/bin/env perl6
 use v6.c;
 sub MAIN(Str $module) {
        my $cu = $*REPO.need(CompUnit::DependencySpecification.new(:short-name($module)));
        say "Dist:   " ~ $cu.repo.prefix.child('dist/' ~ $cu.distribution.id);
        say "Source: " ~ $cu.repo.prefix.child('sources/' ~ $cu.distribution.provides{$module}.values[0]<file>);
 }
	#!/usr/bin/env perl6
	use v6.c;
	sub MAIN(Str $module) {
	my $cu = $*REPO.need(CompUnit::DependencySpecification.new(:short-name($module)));
	say "Dist: " ~ $cu.repo.prefix.child('dist/' ~ $cu.distribution.id);
	say "Source: " ~ $cu.repo.prefix.child('sources/' ~ $cu.distribution.provides{$module}.values[0]<file>);
	}