use strict; my($web,$incident_id); $web = " bla log_id=12345& bla Label Defect bla> bla log_id=53456& bla Label Defect bla> bla log_id=13642& bla Label Defect bla> bla log_id=48735& bla Label Defect bla> "; print "$web\n"; foreach ($web =~ m/(log_id\=(\d*)\&.*?Label Defect)/gm) { print "Found \"Label Defect\"\n"; $incident_id = $2; print "INC: $incident_id\n"; print "$1\n"; do "stuff for each $incident_id"; }
In reply to foreach (shenanigans) by foxops
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |