$x=chr(97);
$$x=1;
print $a;