use Test::More;
use Test::Warn;
use Test::Exception;
+use Errno ();
use DBICTest;
SKIP: for my $count (1 .. 5) {
- skip 'Weird DBI General Protection Faults, skip forking tests (RT#63104)', 5
+ skip 'FIXME: Weird DBI General Protection Faults, skip forking tests (RT#63104)', 5
if $^O eq 'MSWin32';
my $pid = fork();
if( ! defined $pid ) {
-
skip "EAGAIN encountered, your system is likely bogged down: skipping forking test", 1
if $! == Errno::EAGAIN();