$content = "/line 1 jsadkljfksljlj
/line 2 kdsjklfjsklj
/line 3 kdsjflskjfklj
/line 4 kdsjflskajkj";

#useful for loops

while ($content =~ m/\/line(..)/g) { #/g assertion: continue from last match occurred.  
	print $&."\n";
}

#line followed by 2 characters
#\ means escape character