under cygwin, which basicaly is win32 with a *nix layer this code core dump

# echo|perl thisscript
use strict;
use warnings;
use threads;

for (my $i = 1; $i < 3; $i ++) {
    threads->create(\&abc)->detach();
}
<>;

sub abc {
}
[download]

while this one is OK

#perl
use strict;
use warnings;
use threads;
for (my $i = 1; $i < 3; $i ++) {
    threads->create(\&abc)->detach();
}
sleep 1;
sub abc {
}
[download]

... I've tried to mix case of empty sub and processing the <>.