[Moved] perl find all keywords and save the lines with keywords into string

[nelly1]

hallo all,

I wanna write perl to achieve:
find all keywords in the text, and save the lines with keywords into string,then spilt, save the first column to array.
for example,
keywords: nmos
text:
M0 (net1 net2 0 0) nmos
M1 (net2 net3) pmos
M2 (net4 net5 0) nmos

finally, i wanna a array_nmos which contain M0 M2

thanks a lot!!

 

[alexan_e]

Re: perl find all keywords and save the lines with keywords into string

How is perl related to analog circuit design?

 

[nelly1]

Re: perl find all keywords and save the lines with keywords into string

wanne write a automatic device check, so use perl to write ocean script...

 

[alexan_e]

Re: perl find all keywords and save the lines with keywords into string

My point was do you think that the analog circuit design section is the right one for a perl script?

 

[nelly1]

Re: perl find all keywords and save the lines with keywords into string

I'm quite sure i need perl to write what i need...
It's just a example, like using perl to find keywords and save the line

 

[vijayR15]

hay nelli,

I wrote scripts that suits for u..

open(INPUT,"input") ;
$line=<INPUT>;
while($line ne "")
{
if($line =~ /nmos/) {
 @array= split(/[\t +]/, $line);
$array_nmos[$nmoscount++] = $array[0];
}
$line=<INPUT>;
}	
print @array_nmos;

 

[nelly1]

thanks a lot! i solved it with map and grep function. but will try ur codes