Rewriting files

--0-331388445-1251194944=:16496
Content-Type: multipart/alternative; boundary="0-734957951-1251194944=:16496"

--0-734957951-1251194944=:16496
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable

Perl Community,
Once more thanks very much for spending precious time to look at my problem=
.. When the input file is the text below, the replacements are made.
However the text below is record N°. 1 of a binary file. Data follows aft=
er this record.
When I apply the script to the binary file no replacement is made. A sample=
of a binary file is attached.
I will continue trying based on the valuable assistance I have received.
Zilore


rec 1:0:date 2009082400 TMP kpds5=3D11 kpds6=3D100 kpds7=3D850 levels=3D(3,=
82) grid=3D255 850 mb anl:
=A0 TMP=3DTemp. [K]
=A0 timerange 1 P1 0 P2 0 TimeU 1=A0 nx 1303 ny 1 GDS grid 0 num_in_ave 0 m=
issing 0
=A0 center 98 subcenter 0 process 110 Table 1
=A0 latlon: lat=A0 90.000000 to 0.000000 by 2.500000=A0 nxny 1303
        =A0 long 0.000000 to 90.000000 by 2.500000, (1303 x=
1) scan 0 mode 128 bdsgrid 1
=A0 min/max data 268.918 284.917=A0 num bits 14=A0 BDS_Ref 268.918=A0 DecSc=
ale 0 BinScale -10


=0A
--0-734957951-1251194944=:16496
Content-Type: text/html; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable

Re: Rewriting files

zilore mumba wrote:
> Perl Community,
> Once more thanks very much for spending precious time to look at my =

> problem. When the input file is the text below, the replacements are made.
> However the text below is record N°. 1 of a binary file. Data follows =

> after this record.
> When I apply the script to the binary file no replacement is made. A =

> sample of a binary file is attached.
> I will continue trying based on the valuable assistance I have received.

There is no replacement because the data you are attempting to replace is
not in that file. There is no nx or ny or nxny etc.
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: Rewriting files

--===============1210282115==
Content-Type: multipart/alternative; boundary="0-42678744-1251269836=:36300"

--0-42678744-1251269836=:36300
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable

Perl Community
Sorry for misleading. I was working on the erroneous assumption that since =
I specified 'binmode' perl would find the equivalent of nx ny in binary and=
do as required. I definitely have to read on data formats and perhaps conv=
ert the file to ascci, do replacements and rewrite it in binary.
Your contribution has been really worthwhile (excuse my wasting your time),=
but am very thankful.
Zilore



--- On Tue, 8/25/09, Bill Luebkert wrote:

From: Bill Luebkert
Subject: Re: Rewriting files
To: "zilore mumba"
Cc: activeperl@listserv.activestate.com
Date: Tuesday, August 25, 2009, 11:39 PM

zilore mumba wrote:
> Perl Community,
> Once more thanks very much for spending precious time to look at my=20
> problem. When the input file is the text below, the replacements are made=
..
> However the text below is record N°. 1 of a binary file. Data follows=
=20
> after this record.
> When I apply the script to the binary file no replacement is made. A=20
> sample of a binary file is attached.
> I will continue trying based on the valuable assistance I have received.

There is no replacement because the data you are attempting to replace is
not in that file.=A0 There is no nx or ny or nxny etc.
_______________________________________________
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
=0A
--0-42678744-1251269836=:36300
Content-Type: text/html; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable