Select Code to Download

foreach $chapter ( sort {$a <=> $b} keys ($bible{$qbook}) )
{
...
        print "$bible{$qbook}{$chapter}{'verses'}[$i]\n\n";  #line 270
    }
}