Contents

#!/usr/bin/env perl6

use v6;
use MONKEY-SEE-NO-EVAL;
use Pod::To::HTML;

sub MAIN( $file = "../../README.pod6" ) {
    my $file-content = $file.IO.slurp;
    die "No pod here" if not $file-content ~~ /\=begin \s+ pod/;
    my $pod;
    try {
	$pod = EVAL($file-content ~ "\n\$=pod");
    };
    die "Pod fails: $!" if $!;
    my $result = pod2html( $pod, templates => '.' );
    say $result;
}

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
github-markup-3.0.2	vendor/Pod-To-HTML/resources/examples/render.p6