my ($title, $page, $chapter); #### my $title = ''; my $page = 0; my $chapter = 0;