1 files changed, 8 insertions, 0 deletions
diff --git a/cpan/CGI/examples/make_links.pl b/cpan/CGI/examples/make_links.pl
new file mode 100755
index 0000000000..a0aa824556
--- /dev/null
+++ b/cpan/CGI/examples/make_links.pl
@@ -0,0 +1,8 @@
+#!/usr/local/bin/perl
+
+# this is just a utility for creating symlinks from *.txt to *.cgi
+# for documentation purposes.
+foreach (<*.cgi>) {
+    ($target=$_)=~s/cgi$/txt/;
+    symlink $_,$target
+}