http://qs321.pair.com?node_id=570826

greatdane has asked for the wisdom of the Perl Monks concerning the following question:

I must be doing something stupid...

Why would the following while loop hang if the search string is not found in $PS ? Thanks in advance!

while ($PS =~ m/\G.*?Startpoint:\s*(\S+).*?Endpoint:\s*(\S+).*?Path Gr +oup:\s*(\S+).*?slack\s*\(.*?\)\s*(\S+)/gcsm) { <whatever> }
Its something to do with the depth of my search. It only hangs because all of the way through "slack" is found but "slack" is not found. If I make "Path Group" not found, then it does not hang. Also, if I make "slack" found, then it does not hang.

Update: its not the while that is hanging. Its actually the search that is hanging. The program hangs even when I take the search out of the while expression.

Code tags added by GrandFather