cwchen icon

[Perl 6] given .. when

cwchen | PRO | 10/06/17 03:03:03 AM UTC | 0 ⭐ | 902 👁️ | Never ⏰ | []
Perl 6 |

0 B

|

None

|

0 👍

/

0 👎

Raw Download Clone Embed Print View 
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;
    }
}

Comments