whz — Tue, 21 Mar 2000 05:28:00 +0000

Thanks Stefan. That worked

------------------
Steve Caponetto
http://whz.net

Stefen Enns — Tue, 21 Mar 2000 05:06:00 +0000

The following code should do the job fine.

open (file,"file.dat");
@data = <file>;
close(FILE);
@data = sort @data;

whz — Tue, 21 Mar 2000 04:16:00 +0000

Ok, I realize I didn't explain what I wanted very well in my first post..

Ok, The text file has a bunch of data in the form of

name|url|comments|etc|etc...

Then, I am going to be printing out each line of data in nicely formatted tables. What I want to do is when I print out each line of data, I would like them to be printed on the screen in alphabetical order based upon the first data entry - the name. How would I go about sorting these data entries in alphabetical order based upon the first "name" field?

------------------
Steve Caponetto
http://whz.net

Rob Pengelly — Mon, 20 Mar 2000 22:43:00 +0000

Are you just appending the new entry to the file?

You could do somthing like this

code:

open(IN,"file.txt") or die "Cannot open file.txt $!";

@data = <IN>;
close(IN);

push( @data, $NEW_ENTRY);
@data = sort @data;

open(IN,">file.txt") or die "Cannot open file.txt : $!";

print IN @data;

close(IN);

[/code]



------------------
Too many people on the internet lie.