$/=!<>;$_++for@_[glob<>];print-3+grep$_<2,@_