1 2 3 4 5
#!/usr/bin/env escript main([S]) -> A = list_to_atom("problem"++S), io:format("*** Answer is: ~p ***",[A:solve()]).