[comp.binaries.ibm.pc] v03i096: printenv, prints environment variables

ibmbin@bsu-cs.bsu.edu (- IBM Binaries) (07/05/89)

Checksum: 3761893464  (Verify with "brik -cv")
Posting-number: Volume 03, Issue 096
Submitted-by: RAMontante <iuvax!bobmon>
Archive-name: printenv/printenv.uue

Enclosed is a little program for MS-DOS that prints the "values" for
environment variables.  Similar to the Unix printenv but a bit more
general.  Source, executable, and .doc file included.

[
Source is suitable for some version of Turbo C.

Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command.

checksum     size (bytes)  file (between BEGIN--cut and END--cut lines)
   30547         6907      printenv.uue

checksum     size (bytes)  file
   10324         4992      printenv.zoo

-- R.D.
]

printenv part01/01
BEGIN--cut here--cut here
begin 644 printenv.zoo
M6D]/(#(N,#`@07)C:&EV92X:``#<I\3]*@```-;___\"``$````````!W*?$
M_0(!4`,``'$```"G$D*9E7"V!```WP(```$```````````!P<FEN=&5N=BYC
M`(M&"@!_?S8`````````````0"DC*```7ZAHH`"$"A!PY*1Q0Z>,&SL@6B!4
MR!`$'31E0(BP$X9-G3)S1(!X8P;$'(QLV(#@J#",&#8@69A\(X?.R))LTJPI
M0]`@B)]`@_Y<"***FS1X7/RD@B;-G)%N,H89,Z8,'#I/V]1A0R<-')@@PL@Y
M4Z>-0ZPR+[ZI<P:-BYXJ7A`<L7",1S(9><RA0R;-&Q=H?,RM>S?O7C(YQ0`6
MK("N&[MU\(+02X?BF<4$"8Y!(Q;$F#=P\BAL2V=+%Q`]-.+(X0)&C=8W5I:1
M,\>O&Q`HAJ0`,02TZ#2D0<3(L1J$E"!-WC`,P[",B!T$!8*`,KN-T]K*09R1
MP[PA&8MO0-29DY$F"#EE^NY5**9.0XM-GR9\LSU,&Q!$YZR54Q7N2#D@E(%'
M&6.XYQ)89M#4ADP)`NB&<I^U819_:72$4!URP/$&>7/(%,93;"AW1EA/7>24
M?Y^%-AH:-CW8557GE=%&&`L]M1`=4]'Q5D%Q9:;`C3'2@:$;7W"D4FHP0*<`
M07:\D<9W,RZ$`I!BG3&&3)MUID*5=IB&)6<`JN!0EUVD0-`>/0&599AB/@2'
M3"IL.18<2@:UID%&U@D4D`]^,2,=FRF9YE`EH5#E&).!(,-N:!8DU$\-XC8F
M'*@%^-`.!DT*0@BI.5$%$TQ@RNB@CP(%AWMSH*`""I.NL$(**>CY:!^D]A$@
M&^2!$*FA<U;*)::KNEHE'+MQ"H*GH(H*0J.EAC46HJFM!Y,;J@X;:U`"'<1$
M&72<\)08&6U61AB4,O<=>N-E!,:A)QC4HZ./:IK:F+(*=4=38*FJJ;'(,C$J
MO,WB5R@,J*6&0I]_;E;I>D>-T08<^KKI*IS#>O@LK/\&7.JN1E:Z:@LM3+K;
M"LY:"2P*1KI:;&HG]'""J*1J_.@>M`(L\X58H=Q1K#'++`9Z8:Q1;[,U$]TS
MH;@A'`:@:)AI<ZGH"2D'D2FO4&_10`F8!ATH1#UDD3LK6;,&`0'<I\3]`@%=
M$0``EP,``*<2\9I-F9H1``#&#0```0```````````'!R:6YT96YV+F-O;0`*
M`']IM`````````````!`*2,H```9*7.1R((U`;1@-`NQR(4``(L\L`#@2-NH
M1`\8&3CT()&'01U=C'IPS$"C!__^H9L0@)B/0`\6'5N$+=>_/R8"]<!QHTX&
M$XNJ"`"DKT<="(#,??MG\@$@?UGJ$&!Z4IZK<6&&F,!1H(XU0,T`W<N6R`',
M7`$`3!LW:!B"0>/P>2R44=L*=8M\B(@0Z!\``7,._/J;2"_?8^`DR$$QP`>(
M"')$Q"(P[=V1'>_D9!AD&`"=`YP?`ZCC8#`$S'<.+.JW;D`Z``$6?1N@S>.F
MCAX^/0C%<04V1\!H*;FR\,NT<_H<25MT;M\,8"X<&3CX2Y.$7(E7/)NGRL$_
M"Y0DH!,7`)TRA`"::2CXJ*.#2"@M8)+PS\8?E#;ZX-_S`!TO`%"@<T@`T7EP
M$#I;`."=!99(L`@[M#"AB!$"+)2+`P!`HLL/#Z1S"``>X`)`#0MYM$9&!K3Q
M`"X$D!B"1V^@&,>*!;CHT1PHUK&B`39Z<`>*>:P(0`D"5:2+#16&\,$P(0Y9
MC`4G+O1!B`24\&2,4H98@)46X)@E+@9P^:.4PY1T$@``+#,,+4#L\M!"P^3B
M08:Z-/%`@0>F\P\N`P"(CA)^`5#%@X.P0X`55PSB!P$"]&'!(G8@L(X"BWAC
MA!'_W(!.%0ID,0@/H\6S3AB+^&'`.E/\4P,ZCQR012)&$`"II#;\8\=4-51Z
M::;HG++`(,08`*L_"P!3AP=..+$(`0/$"BL_BWC!SS]&\`/(#T;58RL_Z!S0
MZ3H%?#I:,8KZX]E4!NP"P1%'R#;(#Z.14I^ZZ`P!0!9?>+%(.5T,,R@[5D!*
MP`+V\$'!(/Y@8<<`OEP!0"(V^`*!(H0``P$FEJS3P#W>(#S"'>J4)'%*BQ@S
MRB(KIK0.`%YT(<Q#_CXX:40D1!#-./]<8ETH-?_C0,W%UK'.=QI$\!T'1EO@
M@=&WHM,$5/VB*34`+CPRW0`N,.(!-@/P(QU'O@`"@`SDF,`*$(P4<X@UDRQB
M`TR#&",`6@``X@-&`\@1@70@+>)/+'_(`(Q5X]@!2#Q_%"H`+FD-,,P`P93@
MSS^+\+,"/G*`P1PCP#B"#2/0`!=%$O.0(K@JCG1SB#R'9+/(,(M`,P0Z&0"0
MFAQ`H".![?GP``(="/#0`!T$\)!`'>@(O@XYQ7XFA"H*&!O`$(:`(W@^XU3`
M2A(LB$#'`P2(P`,7=1P`"`\BU"'`]@0/DPX,4`TPD"-;#^`1?T,,L,TB]#RX
MPCIR,,>^$N$"_8S#`8FP`P`&40P!V(`5T0.'/N@`C^?`BFK_,($U!K`(LSP@
M"N@X0@"RL`A\-(\$'O#``>@'DAG8@Q^E^T`)#5`?NJ`C!0$`E@!H<H!1W"=H
MKAE&/YYCDW\DX@=M$8!5MM(5>B3B`#%C!V=J!H(Z%(!Q`%A'!181*YK9;!R)
M.(1UF%*SYZRL7_]"5*ED500#C((;$MC!,>J`@)+`$4WK@,`BI!(1.";B#@0(
MA1^)8(!\H?%!:EP4%PV0@@(LH@8#N,<B@9`(`B2"#P((A3;B.$=AV6"3ZT"`
MWP9@JD2HKV0%($`6`6#(*`8L5C.01@E2$@AQH$D*`:+'O4@(#X3]0RIFQ(`F
M)9`((NPP5I2TY"<E,,Q4KK)EKN0B`6(YRW_4\I8!NL4N%]'+R0$3&%J$F#>(
MN4QI)A.5JEP9---XA34NX)?3!*<69%*`!0P)'Y3#!V?&.9H#7`$=H?A'%M8A
M!+?!L63-B\&R%G&-00@#!3L0AAP2<`4KH*,!`ATH"98E1SDXP*+1@,H_9&4,
M9^9Q$70PP`YL`,<Z/..?(A#HREKY+VDN@AJ!4`=L(AJ8453B`69<0$E0A@``
MX$)E`#@D.VQJ!0,,P``_'80T((*,0`0#-E(%P`*D40<%[(`9<]@(5!^P#J$:
M@*A&1:I2;44`='Q"IDF-HC0S@4MTR()RY3AC%!6G1B_(Z@8E&U:T"'"/(P@`
M".<JV3IDZ-=%_$$!997-$:ZE@#H,@%K^*)D3@N8.+OICIOKBU\L$A4B!690,
M`\A"\ZZH,B8H2@$!.(JX_+``BU;B'YE(@1$,D`$K("`09!#`%_QQ#%5"A`@(
M**8";+7<2-G*`(H@`@$P$2!N"`!8;]''+Q70@Y18\:C_6(<`S,@RI1;J4*9%
M1S\$H%I@`$\7*0'O.GZ`12@\!PI0B.YT`X2)ZQ(CN5;PQ[-FFX%%!)B+_,"E
M12&`6YHL0AE8T,(*AK&!:*SCK`>NECKWI501$6&P"Q$1`.1`@&B((QK0T"L[
M2T6I6RV""`[8@3'JP`!%(4``?S!`7VYB!P.`-QVJ6*`/(+$['>'"!A&0,1U+
M0N2TK.-@/G!$D1N`"Q,D><8&*(F4TR*N[]7WOE"PJ#'\@=U[&%.5G_D'\-`!
M`0-D`;@"F,<_CD%(-*&R``]#KG)M+``Z_."==I"C`8H&C[>8:C08^&<6^O&J
MW3;O`(%@@@#2R=KP;F"1RBUF<OE@`!O'M@"1%D!1R=M*1/U"E;ZP<A[-+(`^
MT:$`%FW%")\0-PB\LP[LR%<4`\$.10!`C49``!!Z\)`Y%.`YZ;`'1/QZLWL<
MP@R[`P0=Z./<'K,5'>-88+#2<8UEEW@<@3@%M/_1#TP;@@^4"W8B#(&'?S3"
M%GX(;QO^X8AV+\(3Z/['N?^AB`,@PA![^`</*DL`8Q"@`490!,#_@0@"&*$1
MAHCW(JRQ`F@$0A]BXX,/("YQ?USN"AS_!Q2NO0=M"\L0=OB''.FP@4'X(N4`
M,+9\&\!%!*R`W?\8`,K_L8)CK.,)[XZWR]OM&=<DPMT1IYS'\2&38MG!!2!/
M^LB;U@*3KSOE*[^`RV$N<Y4EH.8Z3WG/P55ST')8KLP>A[.A#0`$T`$"N'B(
M?8&!WVNC`"+E8--@%^$$439U(7)X`!0&>[-`/(+M$,#"A0-4@'RH^$&$![>X
MZ=,/6@AA0I1J;-\-;`#`"V`=!PC0-O"1B<<#[`HJA-:B!%=$JRPB&/>`!A)`
MJU0UNAC&,GZU?,T@+CZT@-5%I?&+*64-AQ8@HG6P0''M3`3B&Q_Y9]5S\\U(
M@T5P>@`\.$(*>-!.Z2L@O]*E+CH"0.9@K3P"K/Y+5T,-@;2&-YZT1SL-4=+C
M">T7'0;`N^GY"BGHQ@H1F#)2?6`#$Y(2S;<(7*``B'`$_P!\GK$!@!!O"I!2
M$?@/#:`C%B4#`M4\/I82Z?`:!4@+`)`.X0``_\``K`8)_<1J#U$'"\!^[I<.
MQ@``H895G.89)M!E$6!1\``5'/ACIY!%"@!>BT`%!K`"PE!)Z=`'_Y`.E2!D
M1#8:.7!D5U8',J!?XA<!_-!>5@1GY"8B`@`%Z==G5_00XG5?]V51!<`/V)4.
MC_`/%5A9'\!JB%4'&%!?N"`)$@!^]Z=>P&(`/9`6=EA?C1`K?"A^T-`/?QB(
MGH%^QJ1^"@"#\G4`(?A,9Y=&`D.%888.P0`5`U5>>\4.`F![LF(J1^"`=#`"
MXK4R3]!T[E4!`>,%"$`M"-!OXN<W69`%W?5+XI`.=0``=.@9-S`(-T@'"D5(
M<C0'*M!E#6!1S<!HS0-_4_`$5V`KM1A^`9("BA@LP[("?O!9-["*`-"*Q]`\
M+""`6R2+M-AO_W"`";B`_R""Z_!1T3*+P<8K^L!HNNA=RR`39B=:^8>)MV(%
M%@4$C`8%FH@.,?`/JR5?'*")N*``?G(-^M@#$JE[*C,`$?E,M==.M\(9=T0'
M'-!'#I)C)/E'PB(5EV0`@D1,TC4I$.-'Q),(*453A"**MG=6BD0``5``PZ1D
MPN(#H$1SS&(,@N4%`O8'HX@.2'`/^!):_6(%H3!..V``FU0']&$#XX0.U8`/
M6?`<H[!)HS!.Z[`#$;%)BW`'`G`//#D:(F!1%."4*S5.70668DF6T2<`82D!
M%N4)7KD.#%`?FX0.E."5$+-)7A"*H^B14\$`RS(`1FD$F85)]U``@D@!<RD!
M=.``R]*3T9*4.W0/X&)1`B!0GWD/!R"("6`K_F!1*I!1^7*)I74K!*,^ZW`!
MJ#0MW+125UD`Z,`#X05KK")0ZX1(J'<`T.)BIL)W"/`<-*$+>A`&XS`"K*`(
M'1`](ND*X4`/.F`,<F``.B`,:LD"(*`#WB`'!Z`#VG`'`P`(ZU">PT`'VS!A
M\3<U]HDF5%`'<B`&;]`"0P`"+0`"0_`&<)`'<I`&9X`&=``"*#`&*0`",9`#
M.(`#("`$;R`';!`&;D`&()`$;D`';.`"`$`$:6`':4`&90`"92`'<G"A#:``
M02`&;G"A;1`&;``"<-"B9R`'8=`&O[.B;9`&;A`&=)`&;^`&+WJ?2KJD3-JD
MB?&DN].D4CJE5%JE5GJE6)JE6KJE7-JE7BJE.)`#+@`#-3"F-P`"=K"B<V"D
M;L"@0_"@`UJ@!YJ@"QJA80H"4A`$37"D=*"A=%`&2CH!`C!I!6``"'"H%%`!
M!3`!WU$`$5":*1&IDAJI!5``DWJIDXH2(U":*!&IC/H/@UH`#P"I__"IESH"
MDHJJC`H`IC``K=JJ4M-^4I,`#\&D5H8F"B``:;&D2(8F@UJK2FH$$8`F0]!J
M3&H%PPH`0C!I3&H&R8HF@:*D=O"L)LBDAD"MT7J?EH"M3&H*W+JDMO"M2FH,
MXGJ?UE"N]FD.Z#HU]K"N4F,`40JM3&H!\5JM2VH"]9JM]FD#^<JD1M"O2VH%
M$A``("``!0L"!``*`@`*F-JP#GNI4],````+`D"QMR```0'<I\3]`@%($P``
MI!$``*<2UI@#7GH"``"D`0```0```````````'!R:6YT96YV+F1O8P`*`'_7
MG@````````````!`*2,H``"A2$GBA$H1)U8:*%#H)$B3(@I!2)0(1TX:-W3*
MN+$#H@4(,FGFP&$3)@\(.V'8U"D#XHT9$&%`S$%3A@V;DV$LAA'#IHQ"A5.R
M%`R")>)$$!4O9MP(8@L(-V':L-P"52H(%UB[@.CR4P&1(E.&#(1")<D3)T8G
M4J&)U")&C1S'O&G3)HP;,FV5SFE9APX(.FQ1JBRSU^7?P#G3[.RY]V):B8!9
MPDTCYXT;J1A=2$SRLBIAF')8BBPS)HV9-&7(L#C,4O#*PB\!OYGC4\'1IU$_
M6V9C,B?+I&]5MW3SNXP<$&PNEM$,XDED.7="LDQY<W+ERQKI/,:IDR?AU7;Q
M1J:,<_`<\*'S!G?1]39GF&Y,>M[K6R8<TJ91"X_LAC6(,GBDX=<<=(1!1QV-
M[1794W6T(89Q+9FQW7P@W(%&&F.@\5$:>#GQ!!4PP7%?3B!<Y)]UEF%&!W/O
M42=3'2(FE]J$N=&7GAEOU''7:F\<]]QTZ;GQ!FY2*<@6@`+*5."!"8(``WL+
M*1!$%50@\804VTGAD&4%OK4:#CFX`$,-8MZ@D`8!`=RGQ/T"````````````
J`````````````````````````````````````````````````````/R#
`
end
END--cut here--cut here