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]

Reply via email to