print$_,$",@$_.$/for<>=~$"..$'.map$#$_++,glob<>