guix_mirror_bot pushed a commit to branch master
in repository guix.

commit 601103a027dc7db49556f880f6f7fba65bdff810
Author: Anderson Torres <[email protected]>
AuthorDate: Tue Dec 30 21:46:03 2025 -0300

    gnu: Add perl-io-pty.
    
    * gnu/packages/perl.scm (perl-io-pty): New variable.
    
    Change-Id: Ie208d9c058e4722d2b3585cca1bbe1ca7d3066bf
---
 gnu/packages/perl.scm | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index bbe4cd3b37..7128b570c1 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -7216,6 +7216,27 @@ and busy().")
 display output if a TTY is in use.")
     (license (package-license perl))))
 
+(define-public perl-io-pty
+  (package
+    (name "perl-io-pty")
+    (version "1.20")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "mirror://cpan/authors/id/T/TO/TODDR/"
+                           "IO-Tty-" version ".tar.gz"))
+       (sha256
+        (base32
+         "1brhszk5p92khn9jjpxpas8ydlcyza6vicmrkhl96f32hpy0jlxi"))))
+    (build-system perl-build-system)
+    (synopsis "Pseudo TTY object class")
+    (description
+     "@code{IO::Pty} provides an interface to allow the creation of a
+pseudo tty.  @code{IO::Pty} inherits from @code{IO::Handle} and so
+provides all the methods defined by the @code{IO::Handle} package.")
+    (home-page "https://metacpan.org/dist/IO-Tty";)
+    (license (package-license perl))))
+
 (define-public perl-io-string
   (package
     (name "perl-io-string")

Reply via email to