#!/usr/bin/perl use strict; use warnings; package foy; use Data::Dumper; sub import { print Dumper \@_; } package main; BEGIN { $INC{'foy.pm'} = __FILE__; # if you're interested in this part, perldoc -f use } eval q{ use foy qw[ a b c d e f g h ]; }; __END__ $VAR1 = [ 'foy', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h' ];