foreach (@INC)
{
    if (-f "$_/".__PACKAGE__.".pm")
    {
        $iAmHere = $_;
        last;
    }
}