tokuhirom / Docopt

Other
7 stars 1 forks source link

Fails to parse the canonical case: #5

Open alexchandel opened 9 years ago

alexchandel commented 9 years ago

It's not entirely clear how this module works with POD, but it fails to parse the canonical Navel Fate case:

This fails with the error [Docopt::Exceptions::DocoptLanguageError] unmatched '(':

use warnings;
use strict;
use Docopt;

my $opts = docopt();

__END__

=head1 SYNOPSIS

    naval_fate ship new <name>...
    naval_fate ship <name> move <x> <y> [--speed=<kn>]
    naval_fate ship shoot <x> <y>
    naval_fate mine (set|remove) <x> <y> [--moored|--drifting]
    naval_fate -h | --help
    naval_fate --version

Options:
    -h --help     Show this screen.
    --version     Show version.
    --speed=<kn>  Speed in knots [default: 10].
    --moored      Moored (anchored) mine.
    --drifting    Drifting mine.

This prints only the Usage: section:

use warnings;
use strict;
use Docopt;

my $opts = docopt();

__END__

=head1 SYNOPSIS

    naval_fate ship new <name>...
    naval_fate ship <name> move <x> <y> [--speed=<kn>]
    naval_fate ship shoot <x> <y>
    naval_fate mine (set|remove) <x> <y> [--moored|--drifting]
    naval_fate -h | --help
    naval_fate --version

=head1 OPTIONS

    -h --help     Show this screen.
    --version     Show version.
    --speed=<kn>  Speed in knots [default: 10].
    --moored      Moored (anchored) mine.
    --drifting    Drifting mine.
tokuhirom commented 9 years ago

Patches welcome