Newsgroups: fj.sources,fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!news.iij.ad.jp!mewgate!mitsuru!mori
From: mori@isc.mew.co.jp (Shigeki Morimoto)
Subject: [tkPerl5] janken
Message-ID: <MORI.94Nov21183759@hvh008.isc.mew.co.jp>
Followup-To: fj.sources
Sender: news@isc.mew.co.jp (USENET News System)
Nntp-Posting-Host: hvh008.isc.mew.co.jp
Organization: Matsushita Electric Works, Ltd.
Date: Mon, 21 Nov 1994 09:37:59 GMT
Lines: 66
Xref: galaxy.trc.rwcp.or.jp fj.sources:3048 fj.lang.perl:296
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=296&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$B?9K\!w#J#N#E#T$G$9!#(B

tkperl5 $B$G(B $B$8$c$s$1$s(B $B%2!<%`$r:n$C$F$_$^$7$?!#(B
DBM $B$K2a5n$NMzNr$r3P$($F>/$7$:$D8-$/$J$C$F$$$-$^$9!#(B

$BC1=c$G$9$,(B $B>!N($,(B 50% $B$r@Z$k$H(B $B$J$s$+%`%-$K$J$C$F$7$^$$$^$9!#(B :-)

BEGIN
begin 666 janken.tar.gz
M'XL( +5IT"X  ^U:[6_;QAGW5_.ON"A*)\66Q#?1J5UWZ18#*>!V16QL'Y*L
MH"7*8DV1FDC%#E+M?W%W&@:L6986Q9JN:Y.UR#H7"Y9_8!C0#]U0H 62;_NT
MY^[X<J1(RTULI6CO^4 >G_=[>7YWI%1OO&&Z.Y;;F#LY0KJ\U&RB.:3(2TLZ
MW-&2H<OD'I&,4-, GJ$;NH) 3S?D.=0\P9QB&OJ!.4!HKN<-[,/T;+\UBW1F
M3?5H_MGM1&(H\J'SOR0WM6C^54-78?X5T)]#\HEDDZ$?^/R?/H4:0W_0<+R6
MZ32V;+?1MP9.$]5JZ#2JG:VAU^"1-"2IO&4'/;-_P1Z@553BK&RWY0S;5H/)
M_=**))V&DEY&XS_N?PA-A33OC;\<WX0'E3P\!+YT'I;<1D"<54K;PV%I$95:
M76_')HV^:9:J*U)YUW9?NRQ?!1TE>E+(DQH]J>1)IA$QQK?PI__XWX-'^-&[
M_\2_PU_AWTME=]B[:/N!-[@.BAHH^@/3;<-]Z%MH<P<:Y8L_>V4-A.6U5W]^
M@[1'*U)[J^?U+;=R\>6-34B'JC3JK$8@/]DPC"IZ\TW4MBU4^JGI_BA 1!]U
M;,="EYDZT[ZZ7#YUQ25C4@Z\/H0)=FS7#E:D8*=OMG90I=SQ!CT%!.OFEN4L
M+[O6;H6H5A>E^?+ \H=.D"\C=FJ!G>UV/%0@^]70#HCL)\,@\-Q$"++Y>5J1
MM<#:"]#JBZBTMF<')4[0LX*NUR8B?[B%;A#!/"J;CD/&CPS6#9C)$5H('^A\
M)H\PJS"VU,;N5&1T:I7:5D,_A-J6'PR\Z^&H+*)P!*!!NPMWTC6XD5Y45Q)#
M-IR53(<7D[[X_8'M!IU*"<.JI"9GVN\\AJM>5SMGSL <T7XR8LB4].@0T5F 
MMP;M1C74(O*CY'$/?XEOQGE,3X2-YJ'")T_F830H_M&2(7-YB"@_D8DE-['4
M)I:8!>P1[Z,&->80\5XT_2-V@YIM.9YOT:)E,IH4M4Y9Q:77\GJ9(@F778UA
M&4WLROD$^1I=,[!<L[ZWU2L1M[PS6 QHHJ["59M44)%CL*9>N6(S6X%]S0(/
MUO; &[IT3+8<",;I^(YYS2(".;=*KSS'4(@6/ETB^0E.SX\:/U6&RO0,8>44
M#>'T#,'XJ?)3I^97\^TV576L3I">_, +3&<]LY@(5-%^P5:UCK)X'$MAT?KK
MA5+KFN462FNF"Q,S(#GMTH0D5H(TG1'9&@G2G@)8[=BNU4:\E.RO])%$&*$B
M92J-=:$G(U2H2Z2Q*NE6L5LJ)0D_-^RWH:@V6C!+\!CL]$S;=3RO3_9J0  V
M_-(-B0),SR(> ;,J9!NO:%7B@DJZ\2[_AF>[E1)@R?F0!SIIE5\CO_'+>KW1
M8 (*@FAC\\+:I4NPV8=J=-=F0<T]=LH@3[":8!-"L'W5ZT@E>Q?T+MVWV$79
M+HV(1G$0,G-E4I20;HXQG#UH&M0#Q*&IO% 49C[,-$>\0J46.6R5[06U>D8+
MG0)XCB36H'V][@V)A]?AU!6-+*!D[<66YW;L[>' JI3""BQ-EF"9'>DN0Z2K
M#"/#$:0)\5(X%"Q$_OD52[AQ7R'=59H1Z1P<\-Z"(]Z[\:F(SXG;1JY9;@P!
MM<XV85ZW',?;)5L"O^"C4"/+\9-P%1)O08$!BH,>X(_Q@X_V\;TIH7]A3T3>
M<H96$I<6#Q_62H7X^W_Q[2DAUJ%JLC$&5CL)P8HNCL%&.%-B=#4._6XEJH]%
M-L@KN9*>%0IVNW"XK7 'ZK,J+,6XQJ K?M?N!)5,U8V>K#SKY:@ZP\432EGG
M1@P;N'Y% ,& .'_T-HD,WC]*J)Y%0FI+8#K7$B4')9AD>%R&0UMT2HI.2,D<
MAXQ*PEG@06]U548_9BKPEI0UIB>G(M-JE"K=,_)SI8L$I;H9@2TUI1M*@2FI
MGK1I!/\CZ5F_J@HZ 8J__S 0/Y'/@$?]_J?)FJ:  OG^HXGO?S.A[/S'Q_QC
MC & 9NAZX?PKS:81S;^JJ]!6-)"+[W^SH-/LY(KHO+^^:[>#+M)4*<WN6O9V
M-R!\&*S ;@$;QHS)8-WXE\E'.+K_RGNRO/C$UU;43KGJD*O&V@JYGJ-MA7'.
MT:N:\%6>KX>N4B(]N1Z)KQ:[4CE#QE<.Y2LI5SDBE1L-KLWS0\VHS5RU\H8Q
MR7.BK7!M/3WLN:)D2.5D? [AAQT\@DE1"+W8U523#%]-N]*FC0.YMK*9=^@Z
ME+6\)7JD*[R#/>MJGZ0L_H<?48XUQG3\C_=_U5C2"/YKLBKP?Q84 3W,^R3Z
M$V8^]A/)8<BO<>73XE!+YW#,X)!-5U)EQ:KRG)JM2L;7B_AZ"O]Y5[Q(,9*V
MRO-I#BJ5*I1O1LZ9*_7Y!%B>Y^(J'" W>53A.JNF7:7PO, DA6-Z#C]TE2?*
M *#,;7 \XL7\2>0/Y[' E3Z!L3%_$JZGFN3RM7/%F\B20/YCHBS^)[]O'%^,
MJ?AO*#'^+ZGD_4^797'^GPE%4,_F?7(+"/GYNT H/,Y7 %G^%E768>W.A+25
M*O"4*RT%"\E5R>( ?U[-G$5S11E^43O_'6<B^A2^FI,5KV 4C)A6P%>L'%?\
MQIV#V!/7#)]W=423IUD,3["N9I[5=V\CR.)_^#/TL<;X-N=_?4FAYW]-_/]K
M)A3A_+;G38(_8>8C/Y$\,]C_WKOJ4#16)O<U]H:2=G64KSWBRX\X_^=3C/^7
MUEZZ\,K:B<0@^&\8Q;__:(J6_/];:Y+??W15$?@_"]K_[2>W\0'^"N'W\1?X
M,;Z-'Z/Q._L?CO^-_X;O[/]&DEY^=6/SI?5U^MOQ^"\@N8,?W/W/_;?QY_@M
ML./^%8P?1?]D&+\WQN//J,8W^,_X_L'#.W?PG_!]? O?Q>]A3/S2?]WBSU'X
MK]IZ?[N'\&?Q8YLZ_.#KNW\@ANBC6W#[ '_Z_DWP<8 _ 5\8W\3_(CE6_OKQ
MP=O5[VR)"1(D2) @08($"1(D2) @08($"1(D2) @08($"1(D2) @02=._P<A
':):7 %   !(D
 
end
END
--
($BM-(B)$B%8%'%$%M%C%H(B       $B$W$m$0$i$^$!(B         $B?9K\LP<y(B
mori@isc.mew.co.jp                   mori@jnet.co.jp
