$re = qr/<!--.*?-->/s;
print $re;