X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/5ee97692d42eea5defce6d1ea12dc84e9578f608..2aa0942b62a6812b687b293f40775d004be6cbe1:/sample.plp diff --git a/sample.plp b/sample.plp index 15323a3..33d06e9 100644 --- a/sample.plp +++ b/sample.plp @@ -1,13 +1,16 @@ <(common.inc.plp)><: +my $textinc = 'data/unicode-sampler/unicode.txt'; + Html({ title => "unicode sampler", version => '2.0', stylesheet => [qw'light dark mono red'], + data => [$textinc], }); -open my $source, '<', 'data/unicode-sampler/unicode.txt' - or die "Could not open text: $!\n"; +open my $source, '<', $textinc + or die "Could not open text at $textinc: $!\n"; local $/ = "\n\n"; my $top = readline $source;