d89d11bb TC |
1 | #!./perl |
2 | |
3 | BEGIN { |
4 | chdir '..' unless -d 't'; |
5 | unshift @INC, 'lib'; |
6 | } |
7 | |
8 | use strict; |
9 | |
10 | my $dotslash = $^O eq "MSWin32" ? ".\\" : "./"; |
5733ee18 |
11 | system("${dotslash}perl -f -Ilib -I../lib pod/buildtoc --build-toc -q --test --build-all"); |