guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

08/10: gnu: Add perl-test-taint.


From: Ricardo Wurmus
Subject: 08/10: gnu: Add perl-test-taint.
Date: Tue, 24 Oct 2017 12:38:45 -0400 (EDT)

rekado pushed a commit to branch master
in repository guix.

commit 237edb6d1f3c9034417983227fe7fdca4a5cee2c
Author: Petter <address@hidden>
Date:   Tue Oct 24 18:25:19 2017 +0200

    gnu: Add perl-test-taint.
    
    * gnu/packages/perl.scm (perl-test-taint): New variable.
    
    Signed-off-by: Ricardo Wurmus <address@hidden>
---
 gnu/packages/perl.scm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 6e527bf..47a1399 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -7896,6 +7896,32 @@ makes fork(2) safe to use in test cases.")
                               "Test-Simple-" version))
     (license (package-license perl))))
 
+(define-public perl-test-taint
+  (package
+    (name "perl-test-taint")
+    (version "1.06")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "mirror://cpan/authors/id/P/PE/PETDANCE/Test-Taint-"
+                           version ".tar.gz"))
+       (sha256
+        (base32
+         "01rip5d7gdr1c7lq6yczzkqfd0500nfa977ryigylj6jj75526vj"))))
+    (build-system perl-build-system)
+    (home-page "http://search.cpan.org/dist/Test-Taint/";)
+    (synopsis "Checks for taintedness of variables")
+    (description "Tainted data is data that comes from an unsafe source, such
+as the command line, or, in the case of web apps, any @code{GET} or
address@hidden transactions.  Read the @code{perlsec} man page for details on 
why
+tainted data is bad, and how to untaint the data.
+
+When you're writing unit tests for code that deals with tainted data, you'll
+want to have a way to provide tainted data for your routines to handle, and
+easy ways to check and report on the taintedness of your data, in standard
address@hidden::More} style.")
+    (license (package-license perl))))
+
 (define-public perl-test-tester
   (package
     (name "perl-test-tester")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]