Generate absolute #line for the packed modules

[p5sagit/App-FatPacker.git] / t / line / line-test.pl

diff --git a/t/line/line-test.pl b/t/line/line-test.pl
new file mode 100644 (file)
index 0000000..f1cc2da
--- /dev/null
+++ b/t/line/line-test.pl
@@ -0,0 +1,14 @@
+
+# To run this test manually:
+# perl -I../../lib ../../bin/fatpack file line-test.pl | perl
+
+package OurTest;
+
+use Test::More;
+
+our $main_file = __FILE__;
+note "File: $main_file";
+
+# Run the tests in the packed file
+do 'line/a.pm';
+