my @variables = $line =~ /<\?--(\S+?)-->/g;