Sort the Holy Bible by verse length with #Perl #80

perl -e 'print sort {length $b <=> length $a} <>' kjv.txt

NEH.10:16 - Adonijah, Bigvai, Adin,    
NEH.10:18 - Hodijah, Hashum, Bezai,    
NEH.10:27 - Malluch, Harim, Baanah.    
NEH.12:5 - Miamin, Maadiah, Bilgah,    
JOH.6:48 - I am that bread of life.    
1CH.1:24 - Shem, Arphaxad, Shelah,    
NEH.10:13 - Hodijah, Bani, Beninu.    
NEH.10:17 - Ater, Hizkijah, Azzur,    
NEH.11:33 - Hazor, Ramah, Gittaim,    
NEH.12:4 - Iddo, Ginnetho, Abijah,    
JOB.3:2 - And Job spake, and said,    
EXO.20:15 - Thou shalt not steal.    
1TH.5:19 - Quench not the Spirit.    
1TH.5:25 - Brethren, pray for us.    
EXO.20:13 - Thou shalt not kill.    
NEH.10:15 - Bunni, Azgad, Bebai,    
LUK.17:32 - Remember Lot's wife.    
1TH.5:17 - Pray without ceasing.    
DEU.5:17 - Thou shalt not kill.    
1CH.1:26 - Serug, Nahor, Terah,    
1CH.1:1 - Adam, Sheth, Enosh,    
1CH.1:25 - Eber, Peleg, Reu,    
1TH.5:16 - Rejoice evermore.    
JOH.11:35 - Jesus wept.