The stupid question is the question not asked | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
Printing the string this way still give me all the lines from file1. I even changed your line: if (index($string, $arrfields[0]) != -1){print "$string\n"; last to if (index(${$filedata}[0], $arrfields[0]) != -1){ print "${$filedata}[0]\n"; last It is not making the connection to grab the line with that part. It prints them all up to the number that ends the $arrfields[0].This file has over 1 mil lines so I cannot use one liners In reply to Re^2: extract line
by lallison
|
|