#! /usr/bin/perl
print join "\n",@INC;