basesystem-jjsandbox/ToshikazuOhiwa/master-jj

recipes

1 files changed, 14 insertions, 0 deletions

diff --git a/external/poky/meta/recipes-devtools/perl/libmodule-build-perl/run-ptest b/external/poky/meta/recipes-devtools/perl/libmodule-build-perl/run-ptest
new file mode 100644
index 00000000..d802781f
--- /dev/null
+++ b/external/poky/meta/recipes-devtools/perl/libmodule-build-perl/run-ptest
@@ -0,0 +1,14 @@
+#!/bin/sh
+
+for case in `find t -type f -name '*.t'`; do
+    perl -I inc -I blib -Mblib $case >$case.output 2>&1
+    ret=$?
+    cat $case.output
+    if [ $ret -ne 0 ]; then
+        echo "FAIL: ${case%.t}"
+    else
+        echo "PASS: ${case%.t}"
+    fi
+
+    rm -f $case.output
+done