uso lib con si pragma en Perl

Question

en Perl, podemos hacer:

uso LISTA lib;

para incluir una lista de rutas en @INC. Del mismo modo, podemos hacer:

use if CONDITION, MODULE => ARGUMENTS;

para incluir un módulo condicionalmente.

¿Es posible hacer una mezcla de ambos, algo así como

uso lib Si la condición, LISTA;

para incluir una lista de rutas condicionalmente. Esto no parece funcionar.

Edit: Lo siento, pero todavía no puedo hacerlo funcionar. Así es como lo estoy haciendo, pero no está funcionando. ¿Puedes sugerir por favor lo que está mal?

use Data::Dumper; 

BEGIN { 
    my $env=$ENV{'ENV'}; 
    use if $env eq 'OLD', lib => '/home/vivek/OLD'; 
    use if $env eq 'NEW', lib => '/home/vivek/NEW'; 
} 

print Dumper \@INC; 

Answer 1

if es un módulo separado (estrictamente un pragma) que lleva el resto de la línea como parámetros. lib es también un pragma separado. Echar un vistazo a la sintaxis documentada use if CONDITION, MODULE => ARGUMENTS y verá que lo que debe escribir es

use if CONDITION, lib => LIST; 

que funciona muy bien.