blob: 0de975ad54042263fb060f779585e367294f1d1b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
Test that non-existent features fail as expected.
__END__
use feature "nonesuch";
EXPECT
OPTIONS regex
^Feature "nonesuch" is not supported by Perl [v0-9.]+ at - line 1
########
no feature "nonesuch";
EXPECT
OPTIONS regex
^Feature "nonesuch" is not supported by Perl [v0-9.]+ at - line 1
########
use feature ":nonesuch";
EXPECT
OPTIONS regex
^Feature bundle "nonesuch" is not supported by Perl [v0-9.]+ at - line 1
########
no feature ":nonesuch";
EXPECT
OPTIONS regex
^Feature bundle "nonesuch" is not supported by Perl [v0-9.]+ at - line 1
|