$string =~ m/(alt=\"Version \d.\d\d\")/; $substring = $1;