Update tests for the packed version

Author: Chris White

Makefile.PL

@@ -21,7 +21,7 @@ testhere:   # Run the tests from lib rather than blib
 \tperl -Ilib -e 'use Test::Harness "runtests"; runtests \@ARGV;' -- t/*.t
 
 testpacked: pack    # Test the packed version
-\texport PERLPP_NOUSE=1 PERLPP_CMD="\\\"$secure_perl_path\\\" blib/perlpp"; \\
+\texport PERLPP_NOUSE=1 PERLPP_PERLOPTS="blib/perlpp"; \\
 \tperl -e 'use Test::Harness "runtests"; runtests \@ARGV;' -- t/*.t
 EOT
 } #postamble

t/01-capture.t

@@ -2,16 +2,20 @@
 # Some basic tests for perlpp
 use rlib './lib';
 use PerlPPTest;
-plan tests => 1;
 
-my ($stdout, $stderr, @result);
-($stdout, $stderr, @result) = capture {
-    local *STDIN;
-    close STDIN;
-    Text::PerlPP->new->Main(['-e','say 42;']);
-};
+if($ENV{PERLPP_NOUSE} || 0) {
+    plan skip_all => 'Loading not tested in this configuration (PERLPP_NOUSE)';
 
-is($stdout, "42\n");
+} else {
+    plan tests => 1;
+    my ($stdout, $stderr, @result) = capture {
+        local *STDIN;
+        close STDIN;
+        Text::PerlPP->new->Main(['-e','say 42;']);
+    };
+
+    is($stdout, "42\n");
+}
 
 done_testing();
 # vi: set ts=4 sts=4 sw=4 et ai: #