my $data = "\@include test";
if ($data =~ /\@include\s+('[^']+'|"[^"]+"|.+?(?<!\\))\s+/g)
{
	print "File name: \"$1\"\n";
}