#!/usr/bin/perl use strict; print "Content-type: text/plain\n\n"; print join "\n", @INC,"\n";