add github issue tracker links to contributing documentation

[catagits/Catalyst-Runtime.git] / t / optional_stress.t

diff --git a/t/optional_stress.t b/t/optional_stress.t
index 076c4f9..9e73cc5 100644 (file)
--- a/t/optional_stress.t
+++ b/t/optional_stress.t
@@ -1,37 +1,38 @@
-#!perl\r
-\r
-use strict;\r
-use warnings;\r
-\r
-use FindBin;\r
-use lib "$FindBin::Bin/lib";\r
-\r
-use Test::More;\r
-use Catalyst::Test 'TestApp';\r
-use YAML;\r
-\r
-our ( $iters, $tests );\r
-\r
-BEGIN {\r
-    plan skip_all => 'set TEST_STRESS to enable this test'\r
-      unless $ENV{TEST_STRESS};\r
-\r
-    $iters = $ENV{TEST_STRESS} || 10;\r
-    $tests = YAML::LoadFile("$FindBin::Bin/optional_stress.yml");\r
-\r
-    my $total_tests = 0;\r
-    map { $total_tests += scalar @{ $tests->{$_} } } keys %{$tests};\r
-    plan tests => $iters * $total_tests;\r
-}\r
-\r
-for ( 1 .. $iters ) {\r
-    run_tests();\r
-}\r
-\r
-sub run_tests {\r
-    foreach my $test_group ( keys %{$tests} ) {\r
-        foreach my $test ( @{ $tests->{$test_group} } ) {\r
-            ok( request($test), $test_group . ' - ' . $test );\r
-        }\r
-    }\r
-}\r
+use strict;
+use warnings;
+
+use Test::More;
+BEGIN {
+    plan skip_all => 'set TEST_STRESS to enable this test'
+      unless $ENV{TEST_STRESS};
+}
+
+use FindBin;
+use lib "$FindBin::Bin/lib";
+use Catalyst::Test 'TestApp';
+
+our ( $iters, $tests );
+
+BEGIN {
+    eval "use YAML";
+    plan skip_all => 'YAML is required for this test' if $@;
+
+    $iters = $ENV{TEST_STRESS} || 10;
+    $tests = YAML::LoadFile("$FindBin::Bin/optional_stress.yml");
+
+    my $total_tests = 0;
+    map { $total_tests += scalar @{ $tests->{$_} } } keys %{$tests};
+    plan tests => $iters * $total_tests;
+}
+
+for ( 1 .. $iters ) {
+    run_tests();
+}
+
+sub run_tests {
+    foreach my $test_group ( keys %{$tests} ) {
+        foreach my $test ( @{ $tests->{$test_group} } ) {
+            ok( request($test), $test_group . ' - ' . $test );
+        }
+    }
+}