Commit | Line | Data |
599cee73 |
1 | perly.y AOK |
2 | |
3 | dep() => deprecate("\"do\" to call subroutines") |
4 | Use of "do" to call subroutines is deprecated |
5 | |
6 | sub fred {} do fred() |
7 | sub fred {} do fred(1) |
8 | sub fred {} $a = "fred" ; do $a() |
9 | sub fred {} $a = "fred" ; do $a(1) |
10 | |
11 | |
12 | __END__ |
13 | # perly.y |
14 | use warning 'deprecated' ; |
15 | sub fred {} |
16 | do fred() ; |
17 | do fred(1) ; |
18 | $a = "fred" ; |
19 | do $a() ; |
20 | do $a(1) ; |
21 | EXPECT |
22 | Use of "do" to call subroutines is deprecated at - line 4. |
23 | Use of "do" to call subroutines is deprecated at - line 5. |
24 | Use of "do" to call subroutines is deprecated at - line 7. |
25 | Use of "do" to call subroutines is deprecated at - line 8. |