a = arcadi shehter <[EMAIL PROTECTED]> a>I think this was already discussed once and then it was proposed to a>attach a property to characters of the string a> a> sub peek_at_sky { a> a> my Color @numbers = peek_with_some_hardware; a> a> my $say_it = join map { "1" but color($_) } @numbers ; a> return $say_it ; a> } a> a> a> rule color { (.) { let $0 := $1.color } } a> a> $daylight = &peek_at_sky =~ /<color>+/; # is something in sky
That works and isn't too bad, a quick fix with some interesting possibilities. Should be an example in the documentation. Still, the RFC that opened this discussion opens a different way- http://dev.perl.org/rfc/93.html http://www.perl.com/pub/a/2002/06/04/apo5.html?page=17#rfc%20093:%20regex:%20support%20for%20incremental%20pattern%20matching Once a user-defined sub can hand characters to rexen- it could hand anything over (floats, refs, etcetera). It's an opportunity ripe for exploitation. -y ~~~~~ The Moon is Waxing Crescent (4% of Full)