Path: utzoo!attcan!uunet!convex!tchrist@convex.COM
From: tchrist@convex.COM (Tom Christiansen)
Newsgroups: alt.sources.d
Subject: Re: uutraffic report (in perl)
Message-ID: <3301@convex.UUCP>
Date: 21 Nov 89 20:40:49 GMT
References: <4025@mhres.mh.nl> <1194@radius.UUCP> <3273@convex.UUCP> <222@cica.cica.indiana.edu>
Sender: news@convex.UUCP
Reply-To: tchrist@convex.COM (Tom Christiansen)
Organization: CONVEX Software Development, Richardson, TX
Lines: 24

In article <222@cica.cica.indiana.edu> mr@cica.cica.indiana.edu (Michael Regoli) writes:
|Script started on Tue Nov 21 13:08:07 1989
|[1] [cica:/u.cica/mr] sh uutraf.pl
|syntax error in file ./uutraf.pl at line 19, next token "%"
|Execution aborted due to compilation errors.
|now that's portable!  :-)
|line 19 of uutraf.pl is:
|%hosts = ();		# hosts seen

You're probably running pre-version 3 perl.  With 3.0, associative arrays
became first-class citizens and could be talked about as a whole using
the %foo notation to distinguish them from @foo indexed arrays.

|(BTW, our "xferstats" is in /usr/spool/uucp/LOG, not /usr/spool/.Admin.)

I'll bet Johan will make it a switch or dynamically determined thing
if you ask him to.  

--tom


    Tom Christiansen                       {uunet,uiucdcs,sun}!convex!tchrist 
    Convex Computer Corporation                            tchrist@convex.COM
		 "EMACS belongs in <sys/errno.h>: Editor too big!"