diff --git a/tests/cpan.scm b/tests/cpan.scm
index 898081b3e5..80ff044abd 100644
--- a/tests/cpan.scm
+++ b/tests/cpan.scm
@@ -66,9 +66,9 @@ (define test-source
              (lambda ()
                (display
                 (match url
-                  ("http://api.metacpan.org/release/Foo-Bar"
+                  ("https://api.metacpan.org/release/Foo-Bar"
                    test-json)
-                  ("http://api.metacpan.org/module/Test::Script"
+                  ("https://api.metacpan.org/module/Test::Script"
                    "{ \"distribution\" : \"Test-Script\" }")
                   ("http://example.com/Foo-Bar-0.1.tar.gz"
                    test-source)