<>;map$a[@a&&1+$|--]+=$_,glob<>;print@a=$a[2]?2:!!$a[1]," @a"