diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-08-12 09:10:04 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-08-12 09:11:26 -0700 |
| commit | c1ca05f02b1d795748a97ee05b8c69ce712090ad (patch) | |
| tree | ec54708cad16bb2323a825863754286e5b35b484 | |
| parent | cfa52385fa426b5ecdf72e96623216af58cd2d77 (diff) | |
| download | perl-c1ca05f02b1d795748a97ee05b8c69ce712090ad.tar.gz | |
Test __FILE__() syntax
| -rw-r--r-- | t/comp/bproto.t | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/t/comp/bproto.t b/t/comp/bproto.t index 70748be551..68b9786f6c 100644 --- a/t/comp/bproto.t +++ b/t/comp/bproto.t @@ -8,7 +8,7 @@ BEGIN { @INC = '../lib'; } -print "1..10\n"; +print "1..13\n"; my $i = 1; @@ -41,4 +41,7 @@ q[ scalar(&foo,$bar); grep(not($bar), $bar); grep(not($bar, $bar), $bar); grep((not $bar, $bar, $bar), $bar); + __FILE__(); + __LINE__(); + __PACKAGE__(); ]; |