The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package Plack::Server::CGI;
use strict;
use parent qw(Plack::Handler::CGI);

sub new {
    my $class = shift;
    print STDERR "Use of $class is deprecated. Use Plack::Handler::CGI or Plack::Loader to upgrade.\n";
    $class->SUPER::new(@_);
}

1;

__END__

=head1 NAME

Plack::Server::CGI - DEPRECATED

=head1 DESCRIPTION

B<This module is deprecated>. See L<Plack::Handler::CGI>.

=cut