From: matz@... (Yukihiro Matsumoto) Date: 1998-01-06T19:40:19+09:00 Subject: [ruby-dev:1231] Re: setenv まつもと ゆきひろです In message "[ruby-dev:1209] Re: setenv" on 98/01/06, WATANABE Hirofumi writes: |わたなべです. |:Perl5.004のソースコード見ると Win32環境では、_putenv 使うように |:なってるみたいですけど。 | |参考にするのなら 5.004_04 のほうがいいです(5.004_56 でもいいけど). |5.004 の方法では memory leak します(と 5.004_04 に書いてある). 手元にあったPerlのソースからmissing/setenv.cを変更してみまし た.バージョンは5.004_03でしたが.こんなんでどうでしょう? # コンパイルさえしていません. --binary follows this line-- begin 644 setenv.c.gz M'XL(""`)LC0``W-E=&5N=BYC`)57?V_;1A+]6_P44P=-))E1G`1W0:JZA9OH M<@5L)[`<^PZ!(:S(E;0VN@:">^1;UH5_4&KS2(L M\74ZF5W_?O[VS>SB\G0V.;_:Q?2S=6FFYJ/5+ZV2=8*S5-I%[.R^KT4^J%W@ M<1S]$3$ZI5P"#F`(05(Q95+3,2$&/'@5A,AR"\#75WAU-*8Z^&_J9DSJ\'!` M?T0]M:!^+O,D+_J[US$,Q#`TH&,HTO/G'=5O.+_A\Q?'+P91CWW,2RGNQKU> M[]60@BW**^LH,;E$*4H\.D-B;53*)6&5AUXOR!?&2>T4BC^=?+IZ81N!4KH* MT*MQ]+##VJ,8L9W(2NBM.=-X+;*8=`>CF(8X&T<,C?YSP(YWV(Y]'!OP45)J MI"7E:&E^]>1A14:H3I_3[K```+*JEN#?1B+=8ML`E2,I;Z+'[F['X?]WV)K")&=VXO[T9 MM$Y]+)Y54:\%IU8.@#J9923O95)#"U25)6TV+05:=']`M3P9-ROT+76(Z$]9 M;'<$-^V7P]=,;30]0+O!D_]K!G,C#/UUH;AR!!#-K*``(F2(UFK1-3 M#:MB4%GSELDM[PNA4TY+T%P%W6Y@'AS?$>).DJT\!."WKH`+#T*EA9/I/AHR MP\!#RHM2RBX,W7SVH.A6/NZV/QTVWSRXA\2$:/KH;/KQ\]0;ZW,S#6Q1@IZ+ M[@0X^-$>_V@/XKK!!F-D(CCRE7"T,>5=0&'AI[/R;?N,H_=6(7LV?0D?Z+K_ M5:H$T%VNK46IQ!R5AG&\PFR82Q[@55'(,A&`H`8%=KY=FIP^*KV4R._-.SJI MENP7"^CH)[H&QV(N`==2OW`TJ_W-1153F7**;CDRHFBP++! ML#7:^I7EQQA"242%$+!-MF1TMJ7,F+O&#N?KPR0?)^\XO;0CZO]+W:.8^%X5 M97\`UTMBVH\&-[5JR`@"2;%]-&H'XT;Q25D_/O"U\G6J%TFH`9<` MGA]";?A,U5.4C_T@S;>SOS5+O[O4]J=L,`"S"#.D,KV\.)V<<\W_9%=U!.`. MY^$H6#%9"N%.X^^&]TV]YGB35#Z+`:T$<\K!#-?4W,&;E;G`EDDLTVQNW,I? M%GXS908F-+5E4IRII#36+!Q]0%XH+%TR#^K[BG6F],R@0EB+>A<&N/B=TACA MEUVN;Z!I*A[]=V`*9@5/WI@O-7XNA._>=6K`X)9G&`#@\(A.\`:SU9F"[TW< M?7&@)L2=%T/&``A.P47N)HBT&2':N62_I2PRD$$)O]^QS)ZW,QJ>PX5Q3-(1/$\E@^YMRV^AGW$]R+7%)=`K]MZ/: M@'>!]\B1?-9XY^^6&"6Z[36C>:=6\)VBI1.'X^ZB[4)6O MY[__!RJI;`&8F[7T@Z"VP8S"+/%#I]E;C!+O`81C-KS*5[(M)\?(^#7DPHS% MW2UX8X(@(C``_X`3>2YHD37*0Z[MT-]WFV!'])M($1!_#/&)R>20\JA1^30] MN:#W[UX>_?/ET;MVWGYO2D'_Z0;IB-9P!LGZ#:?49N2)77\;-S-G=C;] M,+N:7(2+;;TBO81?Z&?3*S2M9YUM^VZWG.H[>3,(?W@RP5JD\19=3U:`@!LL M!G`EE4#5D_Q1@[>5^[?P?03C(EUCV`AF&=A7[@;3M(NU-F+ZG/T28_8-1Q_Q&AJ&"B;B6^UD@95IF M9BXRR^VQ#"O10]>U<%8E*UH(GNCM\?5J2]OZ5]X&B896\OO\":3[R=8]X%UQ M`(M*)V'];A2N%MR#I5QDG3:-.SGCVHUW4;T5H)]MY,P*1R-JP$E-HV_Q4!L)D@N\`-NONTZ]Y>C M)%R3)%TKC5\K.P.[=)MY%M>+Y2_:WR]'Z2:[HE_5-ZC^KKD:AC]$G1M`N^K_ )#\76%TG)#P`` ` end