split file

Hi,

I am new to perl.I have basic question about splitting a file into 2.

the input file= temp.hex

contents

4A
5F
C3
3D

is there a one liner to split this file into 2 files temp1.hex
containing

4A
5F


and temp2.hex having

C3
3D


Thanks in advance

SN

Re: split file

On Babu wrote:
>I am new to perl.I have basic question about splitting a file into 2.
>
>the input file= temp.hex
>
>contents
>
>4A
>5F
>C3
>3D
>
>is there a one liner to split this file into 2 files temp1.hex
>containing
>
>4A
>5F
>
>
>and temp2.hex having
>
>C3
>3D

Probably there is. But unless you tell us the criteria for _where_ to split
it's everyone's guess as what the algorithm is supposed to do.
- split after a given value 5F?
- split before a given value C3?
- split after 2 lines?
- split between given values 5F and C3?
- split one line after a given value 4A?
- ....

In any case, did you check the standard program split? Maybe it already does
what you are looking for.

jue

Re: split file

Babu wrote:
>
> I am new to perl.I have basic question about splitting a file into 2.
>
> the input file= temp.hex
>
> contents
>
> 4A
> 5F
> C3
> 3D
>
> is there a one liner to split this file into 2 files temp1.hex
> containing
>
> 4A
> 5F
>
>
> and temp2.hex having
>
> C3
> 3D

perl -e'$h = ( @x = <> ) / 2 + .5; open _ and print _ splice @x, 0, $h
for map ">$_", qw/temp1.hex temp2.hex/'



John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall