-module(test).
-export([m/0]).
m()->m(io:get_line(""),0).
m([],_)->0;m([H|T],L)->m(T,L+1),io:format("~*c~c~s~*c\n",[L,$ ,H,[[$ ,X]||X<-T],L,$ ]).