Discussion on: Fizz Buzz in Every Language

[John Neiberger]

Here's a shot at an Erlang version, but I barely know Erlang.

-module(fizzbuzz).
-export([start/0]).

fizzbuzz(X) when X rem 3 == 0, X rem 5 /= 0 ->
    fizz;
fizzbuzz(X) when X rem 5 == 0, X rem 3 /= 0 ->
    buzz;
fizzbuzz(X) when X rem 3 == 0, X rem 5 == 0 ->
    fizzbuzz;
fizzbuzz(X) ->
    X.

start() ->
    Result = [fizzbuzz(X) || X <- lists:seq(1,100)],
    Result.