Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/18/84; site harvard.ARPA
Path: utzoo!watmath!clyde!cbosgd!ihnp4!mhuxn!mhuxr!ulysses!allegra!mit-eddie!think!harvard!edwards
From: edwards@harvard.ARPA (Bill Edwards)
Newsgroups: net.micro,net.sources
Subject: Re: Unix Program for Converting SIMTEL20 FTP Server Filenames
Message-ID: <276@harvard.ARPA>
Date: Sun, 28-Jul-85 21:09:27 EDT
Article-I.D.: harvard.276
Posted: Sun Jul 28 21:09:27 1985
Date-Received: Wed, 31-Jul-85 02:46:41 EDT
References: <224@brl-tgr.ARPA>
Reply-To: edwards@harvard.UUCP (Bill Edwards)
Organization: Aiken Computation Laboratory, Harvard
Lines: 19
Keywords: awk TOPS-20 filenames
Xref: watmath net.micro:11193 net.sources:3206
Summary: awk script to tranform TOPS 20 names

This script should also deal with file names you get off SIMTEL20,
CU20B etc.  File names are looked for on stdin, and are emitted on
stdout.

# another go at civilizing names of files from arpa

{
	colons = split ($0, colar, ":")
	if (colons == 0)
	{
		angles = split ($0, angar, ">")
	}
	else
	{
		angles = split (colar[colons], angar, ">")
	}
	periods = split (angar[angles], perar, ".")
	print perar[1]"."perar[2] | "tr '[A-Z]' '[a-z]'"
}