fork download 
  1. (defn format-lic [lic] (apply str (drop-last (interleave (map #(apply str %1) (partition 5 lic)) "---- "))))
  2. (println (format-lic "ABCSADDSKJKJKJKJKJKJKJKJHGGGFGG"))
Success #stdin #stdout 0.86s 214656KB
comments (?)
stdin 
Standard input is empty
stdout 
ABCSA-DDSKJ-KJKJK-JKJKJ-KJKJH
https://ideone.com/rM5z7
language:
Clojure (clojure 1.10.0)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!