Newbie file parsing 1

[NWNinja]

Hi all!
I have a text file that i want to grab some text from.
The lines a want are located between two lines with known words in them. Example below.

.
.
line i dont want
line i dont want
name
line i want
line i want
end
line i dont want
line i dont want
.
.

I want to grab all lines between "name" and "end". I want the line containing "name" as well. Could anyone help me with some example code? Thanks in advance!

 

[1DMF]

what do you have so far?

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you.

 

[NWNinja]

Well, not much to be honest, just reading the file line by line. (I´m using ActiveState perl)

open (FILE, "<C:\\test.txt");
  while( my $line = <FILE>) {    
    print $line;
  }
close FILE;

 

[1DMF]

you say you want to 'grab' the lines , where to you want to grab them to? how do you want to hold this data in an array, a string, another file?

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you.

 

[stevexff]

Homework? It's that time of year, isn't it...

print $_ if (/^name/ ... /^end/);

Steve

[small]"Every program can be reduced by one instruction, and every program has at least one bug. Therefore, any program can be reduced to one instruction which doesn't work." (Object:erlDesignPatterns)[/small]

 

[1DMF]

lol - is it that obvious?

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you.

 

[KevinADC]

lol - is it that obvious?

I'd say it's that easy but it's not that obvious. Steve used '...' in his example but I think '..' would also work in this case.

- Kevin, perl coder unexceptional!

 

[stevexff]

Kevin - in this case you are right. Please accept my apologies for the excessive verbosity of my code...

Steve

[small]"Every program can be reduced by one instruction, and every program has at least one bug. Therefore, any program can be reduced to one instruction which doesn't work." (Object:erlDesignPatterns)[/small]