$foo = indirect user input;

given ($foo) {
    when (A) {
        a;
    }
    when (B) {
        b;
    }
    when (C) {
        b;
        one additional statement;
    }
    when (D) {
        d;
    }
    default {
        similar_to_a;
    }
}