C:>perl -e "use Socket; print $]"
5.008003