perl -e "print join($/,@INC);"