僕のYak Shavingは終わらない

車輪の再発明をやめたらそこには壮大なYakの群れが

書き捨てPerl #3 grep

# 奇数だけ出力
say grep $_%2, 1..10;
# 偶数だけ出力
say grep !($_%2), 1..10;