my ($line) = /^(.*?PATTERN.*?)$/ms;