...
    my @saved_verses = @verses;
    $bible{$book}{$chapter}{'verses'} = \@saved_verses;
    @verses = (); # use again for next chapter