--- a/lib/CPAN/SQLite.pm +++ b/lib/CPAN/SQLite.pm @@ -52,7 +52,7 @@ die qq{The '$CPAN' directory doesn't exist} unless (-d $CPAN); $update_indices = (-f File::Spec->catfile($CPAN, 'MIRRORING.FROM')) ? 0 : 1; } - push @$urllist, q{http://www.cpan.org/}; + push @$urllist, q{https://www.cpan.org/}; $db_dir ||= cwd; my $self = { %args,