-module(p).
-export([m/0]).
m()->S=[[X,Y,Z]||X<-"-r",Y<-"-w",Z<-"-x"],f(0,[A++B++C||A<-S,B<-S,C<-S]).
f(N,[H|T])->io:format("~4.8.0b is -~s
",[N,H]),f(N+1,T);f(_,_)->x.
Note that non-ascii characters in the above source code will be escaped (such as \x9f).