Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!usc!cs.utexas.edu!convex!rosenkra From: rosenkra@convex.com (William Rosencranz) Newsgroups: comp.sys.atari.st Subject: Re: Is there a joiner for uuencoded file parts? Message-ID: <1991May15.144538.24655@convex.com> Date: 15 May 91 14:45:38 GMT References: <1991May14.192458.19903@dvorak.amd.com> Sender: usenet@convex.com (news access account) Organization: CONVEX Computer Corporation, Richardson, Tx., USA Lines: 47 Nntp-Posting-Host: convex1.convex.com In article <1991May14.192458.19903@dvorak.amd.com> bpohl@dvorak.amd.com (Bion Pohl) writes: > > Is there a parts joining script for rejoining the parts of a uuencoded >binary or source file before uudecoding? I've just been doing it by hand and here is what i use, a unix csh script which calls the "dumas" uudecode (here called uude). it unpacked every binary/source posted to c.s.a.st and c.b.a.st: #!/bin/csh # # NAME # uud.sh -- script for uudecoding a split file # # SYNOPSIS # uud file1 file2 ... # set file=$1 echo "doing file $1 (first one)..." if ( $#argv > 1 ) then # sed -e '1,/^@ABCDEFG/d' -e '/^include/,$d' $file > x.uue # some files don't have "@ABCD..." so find a line starting with "begin" # and print it. then delete from start to (and including) that line sed -e '/^begin/p' -e '1,/^begin/d' -e '/^include/,$d' $file > x.uue shift foreach file ($*) echo "doing file $file ..." sed -e '1,/^begin/d' -e '/^include/,$d' $file >> x.uue end else # sed -e '1,/^@ABCDEFG/d' $file > x.uue sed -e '/^begin/p' -e '1,/^begin/d' $file > x.uue endif unset file echo "doing uude x.uue..." uude x.uue echo "done." /bin/rm -i x.uue exit -bill rosenkra@convex.com -- Bill Rosenkranz |UUCP: {uunet,texsun}!convex!c1yankee!rosenkra Convex Computer Corp. |ARPA: rosenkra%c1yankee@convex.com