[Perl 6] given .. when

my $w = Date.today.day-of-week;

given $w {
    when 3 {
        "Hump day".say;
    }
    when 5 {
        "Thank God It's Friday".say;
    }
    when 6..7 {
        "Weekend".say;
    }
    default {
        "Week".say;
    }
}