RosettaCodeData/Task/String-prepend/PicoLisp/string-prepend.l

4 lines
67 B
Plaintext

(setq Str1 "12345678!")
(setq Str1 (pack "0" Str1))
(println Str1)