Date: Wed, 23 Jan 2002 14:10:52 -0600 From: GB Clark <gclarkii@vsservices.com> To: Eric Six <erics@sirsi.com> Cc: questions@FreeBSD.ORG Subject: Re: Text editiing.... possibility for perl? Message-ID: <20020123141052.1ed22c74.gclarkii@vsservices.com> In-Reply-To: <DC32C8CEB3F8D311B6B5009027DE5AD503D207BB@stlmail.dra.com> References: <DC32C8CEB3F8D311B6B5009027DE5AD503D207BB@stlmail.dra.com>
next in thread | previous in thread | raw e-mail | index | archive | help
On Wed, 23 Jan 2002 13:34:27 -0600
Eric Six <erics@sirsi.com> wrote:
>
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> I have a few questions.. I need to edit a few files with a bunch
> text. I am creating forward and reverse zone file for a private
> network and I want to automate this tedious process.. Here is what I
> have.
>
> I create a basic template in excel, it is as follows;
>
> host15,1,in,a,10,50,15,1
> host15,2,in,a,10,50,15,2
> host15,3,in,a,10,50,15,3
>
>
> What I need done after this file is populated is make it look like
> this;
> host15-1 in a 10.50.15.1
> host15-2 in a 10.50.15.2
> host15-3 in a 10.50.15.3
>
> So I need the first comma changed to a minus, the next two comma's a
> tab, and the last three changed to periods. I can do some of this
> with 'cut' but not everything I want to do... I figure I cannot be
> the only one that has had to populate a massive amount of forward and
> reverse files in bind.. I figure there might be a perl script for
> this??
>
>
> TIA
> Eric
>
Eric,
This is a very quick hack but it should work.
I tested is with your data and it output what you wanted.
Hope it helps.
GB
--CUT--
#!/usr/bin/perl -w
use strict;
while (<>) {
chomp;
my($def1, $def2, $def3, $def4,
$def5, $def6, $def7, $def8) = split(',', $_);
print "$def1-$def2\t$def3\t$def4\t$def5.$def6.$def7.$def8\n";
}
--
GB Clark II | Roaming FreeBSD Admin
gclarkii@VSServices.COM | General Geek
CTHULU for President - Why choose the lesser of two evils?
To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-questions" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20020123141052.1ed22c74.gclarkii>