$ perl -e 'map {print $_,"\n"} @INC' #### $ perl -le 'print for @INC'