Pastebin
API
tools
faq
paste
Login
Sign up
SHARE
TWEET
[Perl 6] given .. when
cwchen
Oct 5th, 2017
986
0
Never
Add comment
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!
Perl 6
0.24 KB
| None
|
0
0
raw
download
clone
embed
print
report
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
;
}
}
Advertisement
Add Comment
Please,
Sign In
to add comment
Public Pastes
Easiest method for beginners
CSS | 40 min ago | 0.99 KB
Money comes easy nowadays
CSS | 40 min ago | 0.99 KB
BTC SWAP GLITCH
CSS | 40 min ago | 0.99 KB
Changelly Hacked
CSS | 40 min ago | 0.99 KB
Exploit Documentation
CSS | 40 min ago | 0.99 KB
FREE COINS METHOD
CSS | 1 hour ago | 0.99 KB
Cry Edit Mode
2 hours ago | 2.70 KB
Cry EUI
2 hours ago | 54.92 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the
Cookies Policy
.
OK, I Understand
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!