perl -le"use DBI; print $INC{'DBI.pm'}"