p$.>>$.=1if/ -/ while gets' * '