((show :: Integer -> String) . succ . read) "1234"