[davidrw@host davidrw]$ perl -le 'use lib qw(/path/to/1/); use lib qw(/path/to/2/); print join " ", @INC[0..1]'
/path/to/2/ /path/to/1/

[davidrw@host davidrw]$ perl -le 'use lib qw(/path/to/1/ /path/to/2/); print join " ", @INC[0..1]'
/path/to/1/ /path/to/2/