On Friday, January 10, 2003, at 09:56 PM, Damian Conway wrote:
Just out of curiosity, how did you measure that? ;-)
Well, obviously, I used the Symbol::Readability module:
module Symbol::Readability;
sub delta_r(Str $a, Str $a) returns Int is exported {
return sum [»ord«split/<null>/,$x] »-« [»ord«split/<null>/,$y]
}
and then:
#! /usr/bin/perl6
use Symbol::Readability;
print delta_r('~>','|>');
How else?
Hrm. What was the output?
=)
David
--
David Wheeler AIM: dwTheory
[EMAIL PROTECTED] ICQ: 15726394
http://david.wheeler.net/ Yahoo!: dew7e
Jabber: [EMAIL PROTECTED]