X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/9a4d89685edcb4399aa500d38de84b0101ad09b2..d35f5ce5ec4102ccf530ec3648a70663da85c1d4:/termcol.plp?ds=inline
diff --git a/termcol.plp b/termcol.plp
index ad6ae77..4b91032 100644
--- a/termcol.plp
+++ b/termcol.plp
@@ -18,7 +18,7 @@ use List::Util 'min';
:>
Terminal colours
-
+
<:
sub luminance {
# perceived brightness (using ITU-R recommendation 601 luma co-efficients)
@@ -83,11 +83,11 @@ for my $term (qw/html cga xterm tango/) {
}
print "\n\n";
}
-:>
+:>
-
+
88-colour space
<:
for my $r (0 .. 3) {
@@ -107,11 +107,11 @@ print '
';
print colcell(80+$_, (($_ + 2 + ($_>0)) * 255/11) x 3) for 0 .. 7;
print "
\n\n";
-:>
+:>
<: if ($ENV{PATH_INFO} =~ /256/) { :>
-
+
256-colour space
<:
for my $r (0 .. 5) {
@@ -134,7 +134,7 @@ for my $row (0, 12) {
}
print "\n";
-:>
+:>
<: } :>