e$B$H$-$K!“J#?t9T$r$^$H$a$F07$$$?$$$3$H$,$”$j$^$9!#e(B
e$B$?$H$($P!"e(BRD e$B$G%$%s%G%s%H$5$l$?ItJ,$r<h$j=P$9$H$+!"e(BIO
e$B$N%Q%ie(B
e$B%0%i%U%b!<%I$C$]$$$3$H$H$+!“8D?ME*$K$O:G6ae(B chkbuild e$B$G%m%0$Ne(B
e$B0lIt$r%=!<%H$9$k$H$$$&I,MW$,$”$j$^$7$?!#e(B
e$B$7$+$7!“e(BEnumerable e$B$G$=$&$$$&$^$H$^$j$r07$&%a%=%C%I$Oe(B
each_slice e$B$7$+$J$/$F!”=@Fp$J$3$H$O=PMh$^$;$s!#e(B
e$B%U%!%$%k$rA4ItFI$_9~$s$G@55,I=8=$G$d$k$H$$$&$N$O$R$H$D$N0F$Ge(B
e$B$9$,!"%U%!%$%k$,$H$F$bBg$-$$$+$b$7$l$J$$$H$J$k$H$d$j$?$/$J$$e(B
e$B$3$H$,$"$j$^$9!#e(B
(e$B<B:]e(B chkbuild e$B$N%m%0$O$H$F$bBg$-$/$J$k$3$H$,$"$j$^$9e(B)
e$B$G$O<+J,$G=q$/$+!"$H$$$&$H!"$3$l$,$J$+$J$+$-$l$$$K$+$1$^$;$s!#e(B
e$BNc$($P!"%$%s%G%s%H$5$l$?ItJ,$r<h$j=P$9$K$O$=$ND>8e$N%$%s%G%se(B
e$B%H$5$l$F$$$J$$ItJ,$^$GFI$^$J$$$H$^$H$^$j$,H=CG$G$-$J$/$F!“e(B
IO#each_line e$B$G=q$3$&$H$9$k$H$1$C$3$&LLE]$G$9!#$R$H$D$N9T$,e(B
e$B%$%s%G%s%H$5$l$F$$$k$+$I$&$+$rD4$Y$k$N$O9TF,$,6uGr$+$I$&$+$re(B
e$BD4$Y$k$@$1$G4JC1$K$G$-$k$N$G$9$,!”$=$N7k2L$K=>$C$FO"B3$7$?9Te(B
e$B$r$^$H$a$k$N$,Lq2p$G$9!#e(B
e$B$3$3$G!"%$%s%G%s%H$5$l$F$$$k$+$I$&$+$H$+!"%Q%i%0%i%U$@$C$?$ie(B
e$B6u9T$+$I$&$+$H$+!"8D!9$NMWAG$rJ,N$9$k$H$3$m$OLdBj$K$h$C$F0[e(B e$B$J$k$N$G$9$,!"$=$N8e$NJ,N7k2L$K$7$?$,$C$FO"B3$7$?MWAG$r$^$H$ae(B
e$B$k$N$O6&DL$7$F$$$k$N$G!“e(BEnumerable e$B$K%a%=%C%I$H$7$F$”$C$F$be(B
e$B$$$$$s$8$c$J$$$+$H;W$$$^$9!#e(B
e$B$H$$$&$o$1$G!“e(BEnumerable#gather_each(arg) {|ary| … } e$B$NDse(B
e$B0F$G$9!#0z?t$K$Oe(B Proc e$B$rM?$($F!”$3$l$O3FMWAG$K$D$$$F8F$P$l!"e(B
e$B7k2L$H$7$FJ,N7k2L$rJV$7$^$9!#e(Bgather_each e$B$O$=$NJ,N7k2L$,Eye(B
e$B$7$$O"B3$7$?MWAG$rG[Ns$H$7$F$^$H$a$Fe(B yield e$B$7$^$9!#e(B
e$B$J$*!“J,N`7k2L$,e(B nil e$B$H$$$&$N$OFCJL07$$$G!”$=$NMWAG$OC1FH$Ge(B
e$B$^$H$^$j$H$J$k$3$H$r<($7$^$9!#e(B
Ruby e$B$G$N<BAu$r0J2<$K<($7$^$9!#e(B
module Enumerable
def gather_each(arg)
prev_value = prev_elts = nil
self.each {|e|
v = arg.call(e)
if prev_value == nil
if v == nil
yield [e]
else
prev_value = v
prev_elts = [e]
end
else
if v == nil
yield prev_elts
yield [e]
prev_value = prev_elts = nil
elsif prev_value == v
prev_elts << e
else
yield prev_elts
prev_value = v
prev_elts = [e]
end
end
}
if prev_value != nil
yield prev_elts
end
end
end
e$B$?$H$($P!"e(Blib/scanf.rb e$B$K$Oe(B RD
e$B$J%I%-%e%a%s%H$,F~$C$F$$$F!"e(B
e$B0J2<$N$h$&$K$9$k$H%$%s%G%s%H$5$l$?%3!<%INc$NItJ,$r$R$H$D$K$^e(B
e$B$H$a$k$3$H$,$G$-$^$9!#e(B
arg = lambda {|l| /\A=~ l ? true : nil }
open(“lib/scanf.rb”) {|f|
f.gather_each(arg) {|lines| pp lines }
}
=>
["# scanf for Ruby\n"]
["#\n"]
["# $Release Version: 1.1.2 $\n"]
…
[“the return array (or yielded to the block, if a block was
given).\n”]
["\n", “\n”]
["==Basic usage\n"]
["\n",
" require ‘scanf.rb’\n",
“\n”,
" # String#scanf and IO#scanf take a single argument (a
format string)\n",
" array = aString.scanf("%d%s")\n",
" array = anIO.scanf("%d%s")\n",
“\n”,
" # Kernel#scanf reads from STDIN\n",
" array = scanf("%d%s")\n",
“\n”]
["==Block usage\n"]
["\n"]
…
e$B%Q%i%0%i%U%b!<%I$C$]$/!"6u9T$G6h@Z$i$l$?ItJ,$r$^$H$a$?$$$J$ie(B
e$B0J2<$N$h$&$K$G$-$^$9!#e(B
arg = lambda {|l| l == “\n” }
open(“lib/scanf.rb”) {|f|
f.gather_each(arg) {|lines| pp lines }
}
=>
["# scanf for Ruby\n",
“#\n”,
“# $Release Version: 1.1.2 $\n”,
“# $Revision: 22784 $\n”,
“# $Id: scanf.rb 22784 2009-03-06 03:56:38Z nobu $\n”,
“# $Author: nobu $\n”,
“#\n”,
“# A product of the Austin Ruby Codefest (Austin, Texas,
August 2002)\n”]
["\n"]
["=begin\n"]
["\n"]
["=scanf for Ruby\n"]
["\n"]
["==Description\n"]
["\n"]
[“scanf for Ruby is an implementation of the C function
scanf(3),\n”,
“modified as necessary for Ruby compatibility.\n”]
["\n"]
…
e$B$I$&$G$7$g$&e(B?
e$B$J$*!“J#?t9T$r$^$H$a$kJ}K!$H$7$F;H$$$=$&$J$b$N$O!”$^$H$a$k@he(B
e$BF,MWAG$r8!=P$9$kJ}K!$r;XDj$9$k$H$+!“B>$K$b$$$/$D$+$”$k$h$&$Ke(B
e$B;W$$$^$9!#$?$H$($Pe(B ChangeLog e$B$de(B mbox
e$B$r07$&$N$K$O!"@hF,MWAGe(B
e$B$r;XDj$9$k$N$,$$$$$G$7$g$&!#$=$&$$$&$b$N$O$^$?JL$N%a%=%C%I$He(B
e$B$7$F:n$k$N$,$$$$$N$G$O$J$$$+$H;W$$$^$9!#e(B