Help for this page

Select Code to Download


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

...
# 2 Corinthians 1:3
# 12 Corinthians 5:10