Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Posting-Version: version B 2.10.2 9/18/84; site rochester.UUCP Path: utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!panda!talcott!harvard!seismo!rochester!ken From: ken@rochester.UUCP (and Vicki Herrieschopper) Newsgroups: net.sources Subject: Re: As long as we are taliking about rmgrouping ... Message-ID: <12911@rochester.UUCP> Date: Tue, 5-Nov-85 21:29:28 EST Article-I.D.: rocheste.12911 Posted: Tue Nov 5 21:29:28 1985 Date-Received: Thu, 7-Nov-85 06:38:25 EST References: <245@mit-eddie.UUCP> <136@vcvax1.UUCP> Reply-To: ken@rochester.UUCP (and Vicki Herrieschopper) Organization: Home for the terminally enabled Lines: 43 [Flame on] While I realize the future of this newsgroup is being debated in net.news.group, inappropriate postings are one of the reasons cited for removing this group. Take net.sources out of your group list, PLEASE! Your arguments don't belong here! Thank you. [Flame off] To justify this posting, here is a little shell script I use for counting the number of sheets a file will need on the printer. It is too small to bother to shar. #! /bin/sh # # pgc [files] # prints out the number of lines and pages in a file (or stdin) # based on the shell variable pagelength # form feeds will cause it to underestimate the number of pages # pagelength=66 if test $# -lt 1 then nlines=`wc -l | awk '{print $1}'` npages=`expr '(' $nlines + $pagelength - 1 ')' / $pagelength` echo stdin: $nlines lines, $npages pages else totlines=0; totpages=0 for i do nlines=`wc -l $i | awk '{print $1}'` npages=`expr '(' $nlines + $pagelength - 1 ')' / $pagelength` totlines=`expr $totlines + $nlines` totpages=`expr $totpages + $npages` echo ${i}: $nlines lines, $npages pages done echo Total: $totlines lines, $totpages pages fi -- UUCP: ..!{allegra,decvax,seismo}!rochester!ken ARPA: ken@rochester.arpa USnail: Dept. of Comp. Sci., U. of Rochester, NY 14627. Voice: Ken!