1 files changed, 6 insertions, 0 deletions
diff --git a/test.pl b/test.pl
new file mode 100644
index 0000000000..c3eeb03629
--- /dev/null
+++ b/test.pl
@@ -0,0 +1,6 @@
+$* = 1;
+undef $/;
+$input = <>;
+@records = split(/^--\n/, $input);
+print @records + 0, "\n";
+print $records[0], "\n";