("$System.in"=~/10*
?/).any 0.&print