···

       
1
       
1
       
-
       
diff -ru Paranoid-2.05/lib/Paranoid.pm /tmp/Paranoid-2.05/lib/Paranoid.pm

     

       
2
       
2
       
-
       
--- Paranoid-2.05/lib/Paranoid.pm	2017-02-06 05:48:57.000000000 -0500

     

       
3
       
3
       
-
       
+++ /tmp/Paranoid-2.05/lib/Paranoid.pm	2018-05-10 06:40:35.286313299 -0400

     

       
4
       
4
       
-
       
@@ -61,7 +61,7 @@

     

       
1
       
1
       
+
       
diff '--color=auto' -ur Paranoid-2.10/lib/Paranoid.pm Paranoid-2.10-patched/lib/Paranoid.pm

     

       
2
       
2
       
+
       
--- Paranoid-2.10/lib/Paranoid.pm	2022-03-08 10:01:04.000000000 +0100

     

       
3
       
3
       
+
       
+++ Paranoid-2.10-patched/lib/Paranoid.pm	2023-10-20 16:57:54.025754755 +0200

     

       
4
       
4
       
+
       
@@ -47,7 +47,7 @@

     

       
5
       
5
       
+
       
 %EXPORT_TAGS = ( all => [@EXPORT_OK], );

     

       
5
       
6
       
 
       
 

     

       
6
       
6
       
-
       
     my $path = shift;

     

       
7
       
7
       
+
       
 use constant PTRUE_ZERO   => '0 but true';

     

       
8
       
8
       
+
       
-use constant DEFAULT_PATH => '/bin:/sbin:/usr/bin:/usr/sbin';

     

       
9
       
9
       
+
       
+use constant DEFAULT_PATH => '__BLESSED_PATH__';

     

       
7
       
10
       
 
       
 

     

       
8
       
8
       
-
       
-    $path = '/bin:/usr/bin' unless defined $path;

     

       
9
       
9
       
-
       
+    $path = '__BLESSED_PATH__' unless defined $path;

     

       
10
       
10
       
-
       
 

     

       
11
       
11
       
-
       
     delete @ENV{qw(IFS CDPATH ENV BASH_ENV)};

     

       
12
       
12
       
-
       
     $ENV{PATH} = $path;

     

       
13
       
13
       
-
       
Binary files Paranoid-2.05/lib/.Paranoid.pm.swp and /tmp/Paranoid-2.05/lib/.Paranoid.pm.swp differ

     

       
14
       
14
       
-
       
diff -ru Paranoid-2.05/t/01_init_core.t /tmp/Paranoid-2.05/t/01_init_core.t

     

       
15
       
15
       
-
       
--- Paranoid-2.05/t/01_init_core.t	2016-07-12 04:49:33.000000000 -0400

     

       
16
       
16
       
-
       
+++ /tmp/Paranoid-2.05/t/01_init_core.t	2018-05-10 06:43:41.323183381 -0400

     

       
17
       
17
       
-
       
@@ -35,5 +35,5 @@

     

       
11
       
11
       
+
       
 #####################################################################

     

       
12
       
12
       
+
       
 #

     

       
13
       
13
       
+
       
diff '--color=auto' -ur Paranoid-2.10/t/01_init_core.t Paranoid-2.10-patched/t/01_init_core.t

     

       
14
       
14
       
+
       
--- Paranoid-2.10/t/01_init_core.t	2022-01-24 10:30:20.000000000 +0100

     

       
15
       
15
       
+
       
+++ Paranoid-2.10-patched/t/01_init_core.t	2023-10-20 16:58:16.856288407 +0200

     

       
16
       
16
       
+
       
@@ -35,5 +35,4 @@

     

       
18
       
17
       
 
       
 ok( psecureEnv('/bin:/sbin'), 'psecureEnv 1' );

     

       
19
       
18
       
 
       
 is( $ENV{PATH}, '/bin:/sbin', 'Validated PATH' );

     

       
20
       
19
       
 
       
 ok( psecureEnv(), 'psecureEnv 2' );

     

       
21
       
21
       
-
       
-is( $ENV{PATH}, '/bin:/usr/bin', 'Validated PATH' );

     

       
20
       
20
       
+
       
-is( $ENV{PATH}, '/bin:/sbin:/usr/bin:/usr/sbin', 'Validated PATH' );

     

       
21
       
21
       
+
       
-

     

       
22
       
22
       
 
       
+is( $ENV{PATH}, '__BLESSED_PATH__', 'Validated PATH' );

     

       
23
       
23
       
-