# Linux
$ perl -le '$,=" "; print getprotobyname("tcp")'
tcp TCP 6

# Working Win32 system
C:\>perl -le "$,=' '; print getprotobyname('tcp')"
tcp TCP 6
C:\>

# Broken Win32 system
C:\>perl -le "$,=' '; print getprotobyname('tcp')"

C:\>

# Broken Win32 system Cygwin
Administrator@JAMES ~
$ perl -le '$,=" "; print getprotobyname("tcp")'


Administrator@JAMES ~
$