diff options
| -rw-r--r-- | challenge-166/james-smith/README.md | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-166/james-smith/README.md b/challenge-166/james-smith/README.md index a73165d2cb..82352a1088 100644 --- a/challenge-166/james-smith/README.md +++ b/challenge-166/james-smith/README.md @@ -364,9 +364,9 @@ For ultimate compactness we can remove the function overhead off, turn off both ```perl /\//,$u{$'.'/'x-d}{$d{$`}=$`}++for<*/*>;$l<length?$l=length:1for(@p=sort keys%d),@_=keys%u;print$a=join('-'x$l,('+--')x@p,'+ '),sprintf($b="| %-${l}s "x@p.'| -',@p),$a,map({$l=$_;@p>keys%{$u{$l}}?sprintf$b,map{$u{$l}{$_}?$l:''}@p:()}sort@_),$a +',@p),$a,map({//;@p-%{$u{$'}}?sprintf$b,map{$' x$u{$'}{$_}}@p:()}sort@_),$a ``` -This is the 242 byte version - we could reduce it to 240 bytes by replacing +This is the 233 byte version - we could reduce it to 231 bytes by replacing `print` with `say` again... But ultimately that makes the execution more bytes. Command line with `print`: |