build-system/perl: Lazily resolve (gnu packages perl).

* guix/build-system/perl.scm (default-perl): New procedure.
  (perl-build): Use it.

1 files changed, 8 insertions, 1 deletions

diff --git a/guix/build-system/perl.scm b/guix/build-system/perl.scm
index 6661689efb..eac8f53d3e 100644
--- a/guix/build-system/perl.scm
+++ b/guix/build-system/perl.scm
@@ -35,9 +35,16 @@
 ;;
 ;; Code:
 
+(define (default-perl)
+  "Return the default Perl package."
+
+  ;; Do not use `@' to avoid introducing circular dependencies.
+  (let ((module (resolve-interface '(gnu packages perl))))
+    (module-ref module 'perl)))
+
 (define* (perl-build store name source inputs
                      #:key
-                     (perl (@ (gnu packages perl) perl))
+                     (perl (default-perl))
                      (search-paths '())
                      (tests? #t)
                      (make-maker-flags ''())