for(1..195){for(;;){$r=join'',reverse(split//);$_+=$_==$r?last:$r}print$_,$/}