Re^4: printing several lines around match

Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 109. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 110. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 111. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 112. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 113. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 114. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 115. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 116. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 117. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 118. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 119. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 120. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 121. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 122. Use of uninitialized value $_ in pattern match (m//) at ./perl4line.pl line 25, <$HAN> line 123.

Comment on Re^4: printing several lines around match

Replies are listed 'Best First'.
Re^5: printing several lines around match by muba (Priest) on Jun 19, 2012 at 15:27 UTC
Ain't that one sweet helluva mess. Change the `while` line into this. I think it should solve it. But again, untested. `while ( <$HAN> ) {` But more importantly, instead of verbatim copying that code, try to understand what's going on. Try to understand what I am doing, and why, and how. Of course, my way is not the only way and for all I know it might not even be the best way, but it's the thought process that matters.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^5: printing several lines around match
by muba (Priest) on Jun 19, 2012 at 15:27 UTC

Ain't that one sweet helluva mess.

Change the while line into this. I think it should solve it. But again, untested.

while ( <$HAN> ) {

But more importantly, instead of verbatim copying that code, try to understand what's going on. Try to understand what I am doing, and why, and how. Of course, my way is not the only way and for all I know it might not even be the best way, but it's the thought process that matters.

[reply]
[d/l]
[select]