1 | BEGIN { | ||
---|---|---|---|
2 | if ($^O =~ /mswin32/i) { | ||
3 | print <<EOF; | ||
4 | 1..0 # Perl binary broken, skipping test. Upgrading to a working perl is advised. | ||
5 | EOF | ||
6 | exit 0; | ||
7 | } | ||
8 | } | ||
9 | |||
1 | BEGIN { $| = 1; print "1..5\n"; } | 10 | BEGIN { $| = 1; print "1..5\n"; } |
2 | 11 | ||
3 | use Coro; | 12 | use Coro; |
4 | 13 | ||
5 | print "ok 1\n"; | 14 | print "ok 1\n"; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |