sub BEGIN
{
  unshift @INC, "<path where Net::POP3 is installed>";
}

use Net::POP3;

# script continues