$a = 'a';
print $a--;