print qq(<h1 align="right">$string</h1>\n);