some changes to filter code

[dbsrgits/DBIx-Class-Schema-Loader.git] / t / bin / simple_filter

diff --git a/t/bin/simple_filter b/t/bin/simple_filter
new file mode 100755 (executable)
index 0000000..f8d6f6c
--- /dev/null
+++ b/t/bin/simple_filter
@@ -0,0 +1,10 @@
+#!perl
+
+use strict;
+use warnings;
+
+while (<STDIN>) {
+    print;
+}
+
+print q{my $foo = "Kilroy was here";}, "\n";