view release on metacpan or  search on metacpan

lib/Modulino/Demo.pm  view on Meta::CPAN

=over 4

=item doc

=cut

sub doc {
	say "Running as docs";

	my $data = do {
		local( @ARGV, $/ ) = __FILE__;
		<>;
		};

	my $package = __PACKAGE__;
	$data =~ s/__PACKAGE__/$package/;

	say $data;
	}

sub _test_doc {