From: Tanaka Akira Date: 2002-04-04T19:04:55+09:00 Subject: [ruby-dev:16753] Re: sharing sub-regexp In article <1017890618.302241.17865.nullmailer@ev.netlab.jp>, matz@ruby-lang.org (Yukihiro Matsumoto) writes: > |($B@55,I=8=$N3HD%$J$N$G!"$^$D$b$H$5$s$K3NG'$,I,MW$G$7$g$&$,!#(B) > > $BL>A0!#(BPython$B$H(B.NET$B$N$=$l$>$l$G@55,I=8=$K$3$N5!G=$,DI2C$5$l$F(B > $B$$$^$9$,!"L>A0$,0c$$$^$9!#$J$<$+(BPerl$B$K$O$J$$$s$G$9$h$M!#(B $B$($'$H!"$3$N(B Python $B$d(B .NET $B$N$O(B shy group $B$r4^$^$J$$$N$GHyL/$K$:$l$F(B $B$$$?$j$9$k$s$G$9$,$=$l$O$=$l$H$9$k$H!"A[A|$G$9$,!"(BPerl $B$G$OL>A0$rIU$1(B $B$F$b(B Perl $B$N%3!<%I$+$i%"%/%;%9$9$k$3$H$,$G$-$J$$(B(MatchData $B$KBP1~$9$k(B $B$b$N$,$J$$$N$GFCA0$rJ8;zNs$GEO$9$3$H$K$h$j<+A3$K\A\z) |(?\A\*) |(?\A\d\.) |(?\A:) |(?\A\s) |(?
\A---) |(?
\A=) |(?\A\|\s) /x =~ line if $~[:empty]; '_' elsif $~[:unordered]; 'u' elsif $~[:ordered]; 'o' elsif $~[:definition]; 'd' elsif $~[:indent]; 'i' elsif $~[:hr]; 'h' elsif $~[:section]; enable_section ? 's' : 'X' elsif $~[:table]; 't' end $B$H=q$1$k$s$J$i$H$F$b9,$;$G$9!#$^$!!"$3$N>l9g$OIaDL$N%^%C%A$J$N$G!"$=$l(B $B$>$l$N%Q%?!<%s$GJL8D$K%^%C%A$5$;$F$b$$$$$N$G$9$,!"(BString#scan $B$d(B String#gsub $B$@$H$=$&$b$$$-$^$;$s!#(B $B$J$*!"(BPython $B$N$d$D$OC1$KHV9f$KBP$7$F(B alias $B$rIU$1$k$@$1$J46$8$G$9$,!"(B .NET $B$G$O$=$l$@$1$G$O$J$$$H$3$m$K$OCm0U$7$J$$$H$$$1$J$$$+$bCN$l$^$;$s!#(B $B$?$H$($P!"J#?t$N%0%k!<%W$KF1$8L>A0$rIU$1$k$3$H$,$G$-$k$N$G!"(B href=(?:"(?[^"]*)"|(?[^ >]*) $B$H$$$&$h$&$JMQES$K;H$($?$j!"B>$K$b$$$m$$$m$J5!G=$K4X78$7$F$$$k$h$&$G$9!#(B -- [$BEDCf(B $BE/(B][$B$?$J$+(B $B$"$-$i(B][Tanaka Akira] $B!V$U$($m(B! $B$o$+$a$A$c$s:n@o$G$9$(C"=$B!W(B(Little Worker, $B7KM7@84](B)