$ perl -we'print $^O'
cygwin