The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#line 1
package Module::Install::Homepage;

use strict;
use warnings;
use 5.006;

our $VERSION = '0.01';

use base qw(Module::Install::Base);

sub auto_set_homepage {
    my $self = shift;
    if ($self->name) {
        $self->homepage(sprintf "http://search.cpan.org/dist/%s/", $self->name)
    } else {
        warn "can't set homepage if 'name' is not set\n";
    }
}

1;

__END__

#line 93