summaryrefslogtreecommitdiff
path: root/Examples/test-suite/perl5/import_nomodule_runme.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Examples/test-suite/perl5/import_nomodule_runme.pl')
-rw-r--r--Examples/test-suite/perl5/import_nomodule_runme.pl13
1 files changed, 13 insertions, 0 deletions
diff --git a/Examples/test-suite/perl5/import_nomodule_runme.pl b/Examples/test-suite/perl5/import_nomodule_runme.pl
new file mode 100644
index 0000000..f2136c1
--- /dev/null
+++ b/Examples/test-suite/perl5/import_nomodule_runme.pl
@@ -0,0 +1,13 @@
+use strict;
+use warnings;
+use Test::More tests => 4;
+BEGIN { use_ok('import_nomodule') }
+require_ok('import_nomodule');
+
+my $f = import_nomodule::create_Foo();
+import_nomodule::test1($f,42);
+ok(1, "basecase");
+
+my $b = new import_nomodule::Bar();
+import_nomodule::test1($b,37);
+ok(1, "testcase");