Help for this page
my @unordered = ( '12 Corinthians 5:10', ... '1 Corinthians 2:10', '1 Corinthians 2:10' );
/^(\d+ )?(\D+) (\d+):(\d+)$/.
#!/usr/bin/perl -w ... # 2 Corinthians 1:3 # 12 Corinthians 5:10