RosettaCodeData/Task/Use-another-language-to-call-a-function/PicoLisp/use-another-language-to-call-a-function-1.l

(let (Str "Here am I"  Len (format (opt)))  # Get length from command line
   (unless (>= (size Str) Len)              # Check buffer size
      (prinl Str) ) )                       # Return string if OK