index
:
github/perlweeklychallenge-club.git
master
Unnamed repository; edit this file 'description' to name the repository.
about
summary
refs
log
tree
commit
diff
log msg
author
committer
range
path:
root
/
challenge-030
/
james-smith
/
perl5
/
ch1-better.sh
blob: aef3dac8d27dcb6e97e771424fb46b2ed6324e95 (
plain
)
1
perl
-E
'say"@{[grep{6==(int(5*$_/4)-int($_/100)+int$_/400)%7}2019..3e3]}"'