#!/path/to/perl
print join ", " , @INC;