$found++ while($in_line =~ m/$regexp/gco)