Load cups into easysw/current.

[thirdparty/cups.git] / scripting / perl / test.pl

diff --git a/scripting/perl/test.pl b/scripting/perl/test.pl
new file mode 100644 (file)
index 0000000..acf3191
--- /dev/null
+++ b/scripting/perl/test.pl
@@ -0,0 +1,17 @@
+# Before `make install' is performed this script should be runnable with
+# `make test'. After `make install' it should work as `perl test.pl'
+
+#########################
+
+# change 'tests => 1' to 'tests => last_test_to_print';
+
+use Test;
+BEGIN { plan tests => 1 };
+use CUPS;
+ok(1); # If we made it this far, we're ok.
+
+#########################
+
+# Insert your test code below, the Test module is use()ed here so read
+# its man page ( perldoc Test ) for help writing this test script.
+