perl -MConfig -e "print $Config{path_sep}" ;