#!/usr/local/bin/perl -w
# Display the contents of @INC 
warn "\@INC is: ", join(' ', @INC), "\n";