perl -e "print join qq(\n), @INC"