++\╔K*JhheSlR.z\═\╗ - print out the first line
lR.z - map(len, all_input())
S - sorted(^)
e - ^[-1]
hh - ^+2
J - autoassign J = ^
* \═ - ^*"═"
K - autoassign K = ^
++\╔ \╗ - imp_print("╔"+^+"╗")
jbm+\║+.[+;d;J\║.z - print out the middle
jb - "\n".join(V)
m .z - [V for d in all_input()]
+\║+ \║ - "║"+V+"║"
.[ ;J - pad(V, " ", J)
+;d - " "+d
++\╚K\╝ - print out the end
++\╚K\╝ - imp_print("╚"+K+"╝")
