Aufruf einzelner Test-Scripts via Test::Harness ermöglichen

Syntax ist trivialerweise:

Um alle Tests auszuführen:
  ./t/test.sh

Um nur bestimmte auszuführen:
  ./t/test.sh t/unicorns/charlie.t t/chunky/bacon.t

diff --git a/t/test.sh b/t/test.sh
index 761f902..f5b031a 100755 (executable)
--- a/t/test.sh
+++ b/t/test.sh
@@ -1 +1,9 @@
-find t | grep "\.t$" | grep -v '^t/old' | HARNESS_OPTIONS=j:c xargs perl -Imodules/override -MTest::Harness -e 'BEGIN { push @INC, "modules/fallback" } runtests(@ARGV)'
+#!/bin/bash
+
+{
+  if [[ -z $1 ]]; then
+    find t -type f -name '*.t'
+  else
+    echo -- "$@"
+  fi
+} | HARNESS_OPTIONS=j:c xargs perl -Imodules/override -MTest::Harness -e 'BEGIN { push @INC, "modules/fallback" } runtests(@ARGV)'