This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
do.t: Load test.pl at BEGIN time
authorFather Chrysostomos <sprout@cpan.org>
Mon, 2 Jul 2012 21:47:34 +0000 (14:47 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Fri, 6 Jul 2012 01:14:03 +0000 (18:14 -0700)
so that parentheses can be omitted.

t/op/do.t

index c5a5905..1d67a3e 100644 (file)
--- a/t/op/do.t
+++ b/t/op/do.t
@@ -1,6 +1,8 @@
 #!./perl -w
 
-require './test.pl';
+BEGIN {
+    require './test.pl';
+}
 use strict;
 no warnings 'void';