Path: utzoo!utgpu!water!watmath!clyde!rutgers!princeton!phoenix!asjoshi
From: asjoshi@phoenix.Princeton.EDU (Amit S. Joshi)
Newsgroups: comp.binaries.ibm.pc
Subject: 'rm' REPOST : Original one was bad
Summary: 'rm' a Unix(tm) like replacement for 'del'
Keywords: rm del
Message-ID: <1318@phoenix.Princeton.EDU>
Date: 16 Dec 87 00:09:54 GMT
Reply-To: asjoshi@phoenix.Princeton.EDU (Amit S. Joshi)
Organization: Princeton University, NJ
Lines: 241

Hello,

My apologies to those of who looked at the last posting and found it
a disaster - wouldn't uudecode wouldn't unarc .... I think I have traced 
the cause ( for those who like to know such things - It seems the local
FTP program destroys ascii (yes ascii) files when transferred from the 
PC to the VAX via an IBM 3081). Hopefully this posting should be okay.

A note to those who 'managed' to extract the old posting - there is a
serious bug in the old version which is fixed here.

To those of you who didn't see it before the attached program tries to
emulate the 'rm' command on a Unix(tm) system.

I have tried to make it as compatible as possible. I think it does everything 
that the Unix command does. It has an added feature (bug?) you can turn
options on and off.  So before I keep on at it here it is:

--- cut above this, uudecode, unarc ------

begin 600 rm.arc
M&@A232Y$3T, )24E)24EEP8  (\/QVI"_7 +   ,3H(T*=) 00(Y;4" : %"
M3IDV;^R4 6$F#9LR@0HL2,6TMN[/@1I\BJ&%V @"+G#1V[9*,8\) WPEB#ITP8]8$!J%=<';H=.K(<3/^C1DSY&EKA&YF(TSE%T.FD4AZ
M(YWG&;EW&QH3\=9&&^6!P(9P$]6AFAMG##A1>NO-]X)[\)E11A@4E@%3$""<
M409[58VAD770+<@>"'>$QH9@;+SQQAH*IB&>#D(E<%!"S?UW'61BC&PS%
M%2"*,A09V9%# HE1CE00*"2 Y,'Q6QZWO>$D7&^P$6-G$$HXY8\)G@<"=Q2R
M1P9,&)Z)I8/"17A""R>09\9?'.$V)G3)+=<:'F'XQM5T.3Z5P!'[311&=Z#)
M(=L<88@(@F5_Z35%H(IFI*>!",K7V6>AC:9='C ET". +A1JQE4V95;&7UNR
MZ!EHHNW6VV_!#3>'7E&B!D(;&[JA*1HIFRKT[D$4AWD31'G1IR
MJ-Y$*"1!EV">#>CK'6&0FJY(((A7!ASSB0FIAMVE4=MTU4Y59YK#,H=BPPG.
M:0:=I6(LYJFL89BJ C"9R^I-R])%[T@E@:2>:A(QIE<2\"TZKUT;8>GKB+S-
MAN=XI0;LK:N;Q2=8&%Z"X!EVBOVEZV#"C<%&'1Z%.4<=8NP<$LQSI% JM?!N
MIM><=O:&9N4+LG0F0R"$XJU\%!L6'I=KV0.N3M:V>,E
MN&BI!*\7I],9G9$HG[-Q5;?'=<[QZ1AHL!A&@&ZPH!%\0SIL,4\JL5J&>]2P[=IYU;U)RV5;'EL8UZ*"K5VZ#7 NG1K6U-:A,*SG."T7Q&
M.#02T*CBMSWWE&I.KF"1\,= J,7(\RE5.D#5D9VXK_' ;" W?&3\P:H%R+4Y6MX
M^>'\="2N&\9O,1C)"-KJY#Q?S:$T8X 627 HE")@02!08$)82L641:G !3V"
M26>:AC@QQ04$(@B#")1&GJ89"9!W[)$(JGC%P9E//DNY5F(64[PER:IIXK(A
MTHB8HQTMA"/S2N(6]\@&S+1,!*'$U""']RSX&,U\+N.9'&[72:9,A2-AT*-%
M2MG'0 Y2?Z\B$$=>29Y88A%+9(7ILB4H/S*'&'QR*BZ;@PSL
ME@!2FC)>@)Q7-5?I+*>YLH2P%%S/SE0K;W9QD]Q$)35E,$AHD1!RQ53G++FE
ML2:AS6+X7&;Y*-*E+\WA@W);0;7*52>%GL ,=>J!#_;4G3RT00Q= H%"O^6&
M"GX35OJT5ZETI!"%;%1+PYOE!<,4ASJ0A Z,H6-"&&(N7?(1GN>SGPC,M"7UNX6V 5]ST=,4+)(&WD#G",Z-;7TSDH2J9&0&,)#!
M=PF6D:<.%#4ZU54X0STFU* ,:!;-!Q0LP>,)J"2LDK(JPQPBP' 0@$( M=0%\R+NW$8 ]
M'1'<%V#@8;@*S:3FH/J8T-0&MDO@&4;:VYM9S@5H(/"7XA. @ 
MSP#X@ Y &H'&SJX3#C -@"T W64!. =@-'DJXP$ GP? $P#V%-FS $ A0.+Z
MA2\$.!  0X!R /CW2X !7$$@"0#0$( & !1!$ !'!& ! $D$, ( 4 106(9;
M!"!%  5X& !Y'_8"P(>+G!C :1\N]^&%<@30AP 5/4?'@HP!,$..W !@1P# 
M_0A)13_:X6, +0#P5&)/3;=( "< \"0&4EH(@"4@!H!) ,, L*4.7@8PGRH!
MH$>F"P"\(J$ LP004YL 0/)/G-_HTI@+B5C010"TP-!,"(NX0.,B'LSGB#:C
MQ $ (P:\ 4 B'JSQJ MV'6- '0S]X\@P,P"3RS]_+(+/(MB8$$@/.-Q01P=7
M1 $%+#W(X\HX$9B@2 $D?///I0#PD$4=!.R**199?"'K.%\,80(.!=0A#2#-
M ')/-HDXD 8 @PQS0"#C\/-/-.. "VD; 'B BU=_0HH7HUT <&X)#GR@2Q0!
M_/F! _]8($L!B_C ["X !+##/G<(L,@^C$@3"P'3O'/$-.L,L8(Z.[QS1P*'
M?%/Q'0.L\\>0BWPS@#:0YO&H!WT $(JC*V#C"#"T*/'G-.^%I "[_L*&($ ;0P\2CR#@09S' ,@ !H\@X$&  @T#B".Z+5$;!C
MV+)_+FP5   )@8M'!@H(N&C@P$9&'A((X.?(P!L O@ !F %L$;9%T!8A,\%J
MD;]))A %&'(H&[H* .X!9A(6(NA$("""!Y0C#H !
M">8Z00#BAP$_T&%!C#,BB4L' =AI09Y/JCDED;/D260F@N("2*%>%"I$H2[P
M^>6?N&!3*!<#0.$? !2 B8M?EA( P", 9-'%,E:\R,X]1C#@%QU7[&*(83\ 
M4(<-_]BA0*T($-F/HWZ6H\D" *P@)3R+&--#'C<>,(@_;M AP#KK6$%D"0)8
M^BB5 _B"[+)YU!&!H4?6>JL="&BR1$&5E;.+(K#>2*NMN!*90K5]1CGEK\$.
M6^RQR2[;[+/1$KD#O=>ND^VV_G3;@+BX7FH)F%UX0:JI1/Y0;:T0U.J )@I\
M"J95=J7C3(.X!'&Q'1G;L7''CWS8
M&@@[6%K0B"%^_ .%XX;0(3GE,ES^^'Q0U,J N)K0 , \AA%#P2+XX +!D8X;
M04WG=GQNJR9_/5.Z D3K3<(@/LP!@ !U=-#WWQ5X+BZ1IA0^( (SV'//,7Z%
M+ D >L.<" "41S[YXY9O;P0AWH/?NCR6BD[Z@!1DKWGEZV>^O2&+8RX#HN2(P%7L"!
M$)0@#!5@0 W0$'?EZ,(7#F>J0;"# (/P P("4 <$P.('%/P!/[+@"[^D(QZ5
M,48TP+'%MRE -B8@Q@<8801_),(+_'@;/^3R@Q;0 6;$,(P/&/&7-Z9#%P#X
MAQ'2B$8VRBH!QS  ':TX"@"HT8\ANX0A^ZB( V B%Q/9Q0L(X((='( .!AC"
M$,1QCW6883YG4$ + ! K&Q7F1W,@0"((, 0"C($ 4R# +@@!@&,DBVK+^40<"%&L=&D 5 P1P(P/,M53HSI5!R"+JG?HSSJ!EB$
M W;K ?9J8K]_N_@#9 72AH44(PZY/]8=4^1'0@;+#NB98Q!$@T) Z?,$$?@, 'SP 
MYC^PM@Y7,($M_Y+E*R@@RT>(6R*NX  3K(@!ZP "EA=Q!P.88  W,(()4G #
M*[3YS5J6,YWM? 0&2 $*)E#$$0@@0>4" !-@VH$Q"(OE0#Q! *NC\#HL7-3=
M&#&J4 5PAOZQ"W[\0Q,E_LN)4VP$?/@8&@0@8Y#YL0XL@%C*:(S"% ZYB"OX
M6!!J9'90M@)C&7L"'L(EM;#@G>]D(#LH/#DF,+^2Z
MC&>D,HJA[01@\X/:=JC$M:6M[6'WL=C'GK2RJ7T'F-GA'V_#1Y8_G>4//+O6
ML+80L9]P;'-3NPX^"'B;!9#E Y#;W'\^@ DF< 4!2'S.%$_1Q0G0YGP3X./=
M7A$!&,AMDZ/4I)_PO\\[VPWG [9E;/-L9WWC'#PER._]Z,B]1AK#[:2E@="U46=AW
MN.M@;WSH.MWK:,#(WX[&EGL[Y_AX^#:RWFUD+_WJ!!ARD36AW>E]4(W8E88J
MJ^K0(/+5K!IHJP+@2@LG@-@!;7UK7.6@T:G<51.>RBN&RTJ+R+N5\D^ JUP[
M;U>\ZI6O1F3 ?V54  08!DLG1@![#/":?P1"'!K*_>YO?>ZG"[SGQ
M-GI,O.([@.H<8-:D)NY 1M-/!RV;__Q%' #$(C; ((:!@$%$X[?1N(,'&MJ0
M.V" ^TGW.]"MSNB5C]L+SB^VSU<@HPU UY$=TD &1]G-^A@C[)"-ZA#LC
M)C<'H -Z%&!&X !7V#\\YP5U!@BQ0@\T%$LR]0  !^D"T#^3:J (MZI K'%3M9PPJUH@J\Z(L*% !V4(]>D)#3
MV#S_X 08F9"-]$C7M OX  "5=$F9M$F=5 Z@=!0 H (F"0 O   Z0$H P 4 
MT 0!P T!D"F'TA<\>2@G% S/0U%UL N!\ P452L<4"L:4"L0>9&XX"E0@ [0
MX \("8OKL F,( T ! O1QPIU$ G7IPIUP AZ\P(+F95T>",$D)2V=XF9")41
M63)'@@Z1@)49J9 >N0YM4#WI( 5ZM)9[V99,D92>4BNG: >I: =1J0JX8'M5
MJ05ZJ9'7U)&J(&T):9C.5I@_H -V] #_T)5?&9834I;^DP[]D&3V8$?VX ])
M:47OX _IP Z5R48Z4 89AY@=.906R5X7722Y3@ Z \ ^9H&PK
M@ T;H R)L%9GI "O& AG( !?X ]J=DT <&APIFAU=F<:LT.1-FF55C\T "8[
MR% *\(,,):$5-E89EHL(L(<.BG:#M61-]F1#  MY0G:O*&F49BE$*B#$H'M6
MD(-\Y&<;:@$AB@ CZ@W^D DNL0C*@ 5:L +#L '1 &5E.F55A@L < "&8 #4
M0 !B-,N@X(0">B,*B(BIZ@-8NV
MDA=\$ '+@@5W, +390T$H B$@ V49@EQ=P_>L"PB< <0$$BJVF3&, J^(VH%
MX M7,#78X%[*0%&FXJ=$(&V:YZ< P'G1( [1  VR2 M"$".R-V(@ACM0!5=R
M\"P'X'J9X*D9)@(0Z <0(&T., C[0 )WP 6 L \"( =7(%6GXP2BF Q]( %N
M8C8X(C<%T )'< _9< _8, C9  "-8 ?>, X0$ DK( WW, ^1$+$V@ @48 3C
ML$#P\+ 4:[%& #+TT A.X T".P#.P ].8 .*0  LH "I1  Z8# "4(6J( [N
M  L H I.>(C/F*#*[6RPT/H8 G_X%-]*XO2&0#4:9UVH@25@IVMHP#>"9ZO9RI8
M]@\/\)X? @EU!#.D [T"8)0P@PZ+%#>>1E$!4&:L10I2%8M@)' '/[M%-1.H,C8)U@D@ZS($P!]$ 1T8@+_T&AA] 4,,(ABJ,(*@$DJ
MW "ZB67P*0"VYS_B@KY3RKY7<:ES(B-0O ZBB;\-9D V,85E5<#%FUD&1 F[
MZW@D!:H,8 1F_"%I_ %.0 ?LA+]OP[9MB,7EA YG$,A*2@=#L [AL,@1Y\+_
M0,4<\,AZ5&>-U+Q:?)]>? !S7#R.+(>C+,D&A !25@Y*6@>_4"P1HPP=0S&T
MH .9IWJJELZGI8\+>@>CI^( %;J&5<-@QV
M9 V&\0\"4) B4Q"P\0=V #/% , "_"T&C,##T$2!%,"[= &\0P,"# &X@ ,#
M<,#71[2!1,]^L85A1@<3,,,D'#OH>RX8\(M>\&9G["ET\+S_< =O%M'E\A<7
MH-!O)J,", __H&;UBW,>N@C#4  3 8!OMB(\RF@,\%P"0 =AD!=VT 6!Q (#
M\ H!$$B197O-^(9U$ )6<"D!@K2BI@)/=:YM
MN(5SUJ-:/&[L-\Q='
MP+>X8P0(, #&4&KLT(]H/25K/9[^*,$@%&+**AO"MHMZR[?TY;>?92K\X &0
M6UCW(!6KEAGW$ TVX;@*, ^FH A$T-$J4 3_@ FR.]:?"KD*@+.KQ@^981KW
M  U(,+OIR0Z-_=C#)172=HC+D!DKD V,  R.@ VF?0C+,!V+,-RJ4("".[N\
M' 2_O'FL-\PR^7JQO3A-(E40  0]0%&JRQ+IL !2LM#0= ^'  J> @AT< '#
M:;=XJ\-BB@#I<#]O@Y^&H <;X@EXL+LHLX[MV B>$#F,P#Z)X ER$&'V$#+:
MY03$8-\:8@CW_86(8 AW\ ^ @ \"R@ )/N!HN#"&,."* .$ )^ =+8;_L.&[
M2^*,$ W\'3EVV@,JP0>XL @FCN+]_0]VBCH#]#C: SKLO3R)8 A\\ _ 9> 1
M!@QR\ /6O0+&,  ^3N/'L Y% .,#?N(I3N/#@#K-:15VX (W#CF2H^-&S.-+
M#ES^8Q6J*VJ%]8Q*_N,KT.0#8-T)RE?*&M[C[2D(H!:P4"T%K5EA^B>T  3*
M"F)LM:V;]P!0$.?C$ B/0-X   %8T'J@%]WH^:2^0%&,X 7^< Q[A,_9=$AG
MS#5(72O^P,;JBW9., A[-(D%'@X!)3'R904$D L$\ "[$ 0%P ^*8 S2@ [7
MH JW+@+%L.N*( RY#NS"X.N[;HP4-=WL($Q&8)X 8 Q&8)P&P ^-X >PD B^
M<-^+D.T IS(TP14LQ ,EX#\56P!'X ].\ I_T [:"P#I$ ,K5P[I@ \#D AV
M0 @T(>YT, [8?M\KD PM*@C0#@@@@ A.$ C'L.0:DO"1,Z$4QPJ8 !.3  CK
M  +O"@9S4 2*\ E1D+3#T ,6  #EG Z=T.;8 $WS<0HR0R;F0),!@$5A$ !J
M$ "@$ "H$  D$ #5$ !:2@L!L"DH( #<( !Y( #DR0$$D 1)O_2JDM#I, 8#
M  C]$!3X  A.<"CK\ E2'Q3M8/6 \"R4L/5W( YN$@@K0 >)@ A6$ CK0 AB
M+Q=F  C?D [W+?8:X/4@D YL(.%3?P=!H#]?7PT..1XP_%L [P(/4$, ?14 LK
M=PZ2P (P@ F3?P<54 L"< A+;A5\0 VZT#'W( Z,^N/KD RF7P>J8/N1@_N\
ML/L T/N,&CGK$ M>#P&U4 #KD J $/?O,/WK$ JW@ #KH "WL$#@#P&SD X"
MH W0SAW&8 A[\ \ @ B60-^,OP@%\+#K( 'AO_[M'P#P+_]^@&@%D E'< 3V
M[@" WS\%D&45< 1'3P".XP>'< 6*< P2U.'M#P7H"Q ) -@(
M8.' (DM^_BV0]F= .G4 TM4#@,B2GG^)[#AHY,<0,2\*3/R[,61((I#VC  "
M00>"2)(F019$!ZL?+!VJ9J+J9\-8 0#&#.WY!P"0&4#[&CDQM"+?H6<'$^Z(
M]D? HFCI+ '(Z*#B16)^0BXJ,,B( @$%.1ZB!!B44]RI[U<&#!OW4+3! +;)8 (V +CM4I0/B7C@+H $0L%6"'HX1V""SZ
M?-@-I+I=+>(-.SKA@F1]!N0R ,# E2@6&GDY-$4*+KDB5$+1%$" 9L$(TOHY
MM!(E]X_+.()]+!4D!P@/!00!TR*&+*18#P\T9?@_@A" !_
MC'",$?(!L X'$>)!1P$18E&'!( X 0@0@ZPC 'R""-!' 1M>",  3@BREP!U
M/+!. K" <%TZY0"PQ [9_#'/7D"*$,! ! P@ 5=<@AQALM# %""R ,\08<>!P PA"O"$'&V&X008(2;A!!QLN $!$&G:D0489()0AAQQ&
M-Z! $&*X870;8; ! AQRM  !U
MS!'&&5B_888. +1@QA8M=)$ $66P408=6-^1!AUH3*ASTGF T$890!NP)
M1%&'UIV+48891F-]]>QE_ Y""6/\784;:XA]AQL@S$RWW2 @[O?I"J"O?O!5
M#*\#"'*TW<(69MC\ ^P@\&!&&I+/X4/BBVOYT*V.
M="UXG0!E5\#:W2YWN[.9[XR'/.4Q#P3.@Q[N:D= RB4.>>W#FAO*("(0A$$.
M9ZC#YYSFPCFX$ 3[DYS'GP7M!G_;&PC28$/"/+S #3[[
M0>FR!X#I55"+;7QC'.?XMZBY(&I:Y.(-;8<[W1EMC&6L(.?4R$8WPA$$
MW[B@ A>H  !%D((4GB"%]\FL#FQ8FMAT9D?:G6!O)R CV3HW2A!B38IPH$,>
M_I;)3782!%"8&QK"5\46H 'M#5<:(7$ ] *@ :4S  00($;0,F&%   !C&0P0QH4 ,;W  '
M.0B"$(9 A"(8 0 3F$  )D"!T(;6.!,8  $F@( "0"(!$X!$^AQ@ 0<< +:F
MK4!L$\" V"K@ 0EP@'!O&UH#3" ""FA :"$P@06$MK>0.   ^A  ZGY!+@! 
* W:UJQGN @ :  EP
 
end
------ cut below this ---------