summaryrefslogtreecommitdiffstats
path: root/contrib/perl5/t/comp/decl.t
diff options
context:
space:
mode:
authormarkm <markm@FreeBSD.org>2002-05-16 10:09:28 +0000
committermarkm <markm@FreeBSD.org>2002-05-16 10:09:28 +0000
commitf56e05005c751822074f0a22aa9a98d2eb189924 (patch)
treee28fc632241c9d248069d45dd9ab2a41fa64868f /contrib/perl5/t/comp/decl.t
parent344ddc14973a1519f100f54051dcb068069fe43c (diff)
downloadFreeBSD-src-f56e05005c751822074f0a22aa9a98d2eb189924.zip
FreeBSD-src-f56e05005c751822074f0a22aa9a98d2eb189924.tar.gz
Perl is no longer in base. Long live the port!
Diffstat (limited to 'contrib/perl5/t/comp/decl.t')
-rwxr-xr-xcontrib/perl5/t/comp/decl.t49
1 files changed, 0 insertions, 49 deletions
diff --git a/contrib/perl5/t/comp/decl.t b/contrib/perl5/t/comp/decl.t
deleted file mode 100755
index 32b8509..0000000
--- a/contrib/perl5/t/comp/decl.t
+++ /dev/null
@@ -1,49 +0,0 @@
-#!./perl
-
-# $RCSfile: decl.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:19 $
-
-# check to see if subroutine declarations work everwhere
-
-sub one {
- print "ok 1\n";
-}
-format one =
-ok 5
-.
-
-print "1..7\n";
-
-do one();
-do two();
-
-sub two {
- print "ok 2\n";
-}
-format two =
-@<<<
-$foo
-.
-
-if ($x eq $x) {
- sub three {
- print "ok 3\n";
- }
- do three();
-}
-
-do four();
-$~ = 'one';
-write;
-$~ = 'two';
-$foo = "ok 6";
-write;
-$~ = 'three';
-write;
-
-format three =
-ok 7
-.
-
-sub four {
- print "ok 4\n";
-}
OpenPOWER on IntegriCloud