spragueg — Tue, 17 Sep 2002 05:46:52 +0000

Nevermind, I didn't get it when I first responded. I see the chomp; thing now. I like it. Exactly what I'm looking for!

Thanks much,
Graham

spragueg — Tue, 17 Sep 2002 05:29:30 +0000

Ok That's what I thought however I am troubled by the writing it back part. Wouldn't MYFILE contain the original file contents. but you're showing only writing back the one line. Wouldn't I have to replace the current file in @lines with the new data and then put the @lines back into MYFILE? Then write the file?

ROB — Mon, 09 Sep 2002 15:21:31 +0000

quick sample

	open(MYFILE, 'path/to/myfile') || die();
	my @lines = <MYFILE>;
	close(MYFILE);

	open(MYFILE, '>path/to/myfile') || die();
	foreach(@lines) {
		chomp;

		# split the line into column data
		my ($id, $fname, $lname, $moredata) = split(/\t/);

		if($id == $idYouWantToChange) {
			# do stuff with the line here
		}

		# write the line back to file
		print MYFILE "$id\t$fname\t$lname\t$moredata\n";
	}
	
	close MYFILE;

Wil — Mon, 09 Sep 2002 13:16:03 +0000

Yes, I can guide you and provide sample code, but firstly, can you supply us with sample data? Can you give me a snapshop of the file? And also, what part of the file (which column) would you like to modify?