9. Getopt::Clade looks cool (Chapter 14)

Why, yes it does. Unfortunately, the current implementation is this:

    package Getopt::Clade;

    use version; $VERSION = qv('0.0.1');
    use Carp;

    sub import {
	croak 'Getopt::Clade is not yet available';
    }

1;

    __END__