perl -E 'BEGIN{unshift @INC, ".";} use forks' #gross

#better
perl -I. -e'use forks'