summaryrefslogtreecommitdiff
path: root/t/t4034/perl/post
diff options
context:
space:
mode:
authorLibravatar Junio C Hamano <gitster@pobox.com>2011-02-09 16:41:17 -0800
committerLibravatar Junio C Hamano <gitster@pobox.com>2011-02-09 16:41:17 -0800
commit1bb4abeff7e541ccfd7c87f5369b090829346e68 (patch)
tree7e9dae7f6a5aba1d5241851bd46c6f7f458ebaf6 /t/t4034/perl/post
parentMerge branch 'rr/fi-import-marks-if-exists' (diff)
parentt4034 (diff --word-diff): add a minimum Perl drier test vector (diff)
downloadtgif-1bb4abeff7e541ccfd7c87f5369b090829346e68.tar.xz
Merge branch 'tr/diff-words-test'
* tr/diff-words-test: t4034 (diff --word-diff): add a minimum Perl drier test vector t4034 (diff --word-diff): style suggestions userdiff: simplify word-diff safeguard t4034: bulk verify builtin word regex sanity
Diffstat (limited to 't/t4034/perl/post')
-rw-r--r--t/t4034/perl/post22
1 files changed, 22 insertions, 0 deletions
diff --git a/t/t4034/perl/post b/t/t4034/perl/post
new file mode 100644
index 0000000000..e8b72ef5dc
--- /dev/null
+++ b/t/t4034/perl/post
@@ -0,0 +1,22 @@
+#!/usr/bin/perl
+
+use strict;
+
+package Frotz;
+sub new {
+ my ($class, %opts) = @_;
+ return bless { xyzzy => "nitfol", %opts }, $class;
+}
+
+__END__
+=head1 NAME
+
+frotz - Frotz
+
+=head1 SYNOPSIS
+
+ use frotz;
+
+ $nitfol = new Frotz();
+
+=cut