Select Code to Download

Running this code on 2 OSes, gave me the following results, so far: 
Lin: /etc/perl
Win: C:/Perl/site/lib

for(@INC){
    unless($_ eq '.'){
...
        last;
    }
}

for(@INC){
    unless($_ eq '.'){
        $libPath .= "$_ ";
    }
}

print "@INC\n";