$\+=!($_%3)+!($_%5)<<2||y///cfor glob<>;print