SYNOPSIS

        # apoc@box:~$ cpanp install Task::POE::All

DESCRIPTION

This task contains all distributions under the POE namespace. EOF

$string .= pkgroup( 'Servers', qr/^POE::Component::Server::/ ); $string .= pkgroup( 'Clients', qr/^POE::Component::Client::/ ); $string .= pkgroup( 'Generic Components', qr/^POE::Component::/ ); $string .= pkgroup( 'Data Parsers and Wheels', qr/^POE::(?:Filter|Wheel)::/ ); $string .= pkgroup( 'Event Loops', qr/^POE::Loop::/ ); $string .= pkgroup( 'Session Types', qr/^POE::Session::/ ); $string .= pkgroup( 'Debugging and Developing POE', qr/^POE::(?:API|Devel|Test|XS)::/ ); $string .= pkgroup( 'POE Extensions', qr/^POEx::/ ); $string .= pkgroup( 'Uncategorized', qr/.+/ );

$string .= "\n=cut\n";

# Write it out! print $string;

exit;

sub pkgroup { my( $header, $re ) = @_;

        my $str = "\n=pkgroup $header\n\n";
        foreach my $s ( grep { $_ =~ $re } sort keys %seen ) {
                $str .= "=pkg $s $seen{$s}\n\n";
                delete $seen{$s}; # so our final catch-all will work!
        }

        return $str;
}