Revision 5310b7f1
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| t/structure/no_lexicals_in_postif.t | ||
|---|---|---|
| 1 | 1 |
use strict; |
| 2 |
|
|
| 3 | 2 |
use lib 't'; |
| 4 |
|
|
| 5 | 3 |
use Support::Files; |
| 4 |
use Test::More; |
|
| 6 | 5 |
|
| 7 |
use Test::More tests => scalar(@Support::Files::testitems); |
|
| 8 |
use PPI; |
|
| 6 |
if (eval { require PPI; 1 }) {
|
|
| 7 |
plan tests => scalar(@Support::Files::testitems); |
|
| 8 |
} else {
|
|
| 9 |
plan skip_all => "PPI not installed"; |
|
| 10 |
} |
|
| 9 | 11 |
|
| 10 | 12 |
my $fh; |
| 11 | 13 |
{
|
Auch abrufbar als: Unified diff
Test mit PPI nur durchführen, wenn PPI installiert ist.