¿Cómo puedo construir rutas de archivos independientes del sistema operativo en Perl, incluida una letra de unidad de Windows opcional?

Question

Necesito construir una ruta de archivo dentro de una secuencia de comandos de Perl. ¿Qué separador de ruta debo usar para permitir que mi script funcione tanto en Windows como en Unix?

Tenga en cuenta que Windows necesita una letra de unidad.

Answer 1

¿Quieres File::Spec 's catpath:

 
     catpath() 
     Takes volume, directory and file portions and returns an entire path. 
     Under Unix, $volume is ignored, and directory and file are 
     concatenated. A '/' is inserted if need be. On other OSes, $volume 
     is significant. 

      $full_path = File::Spec->catpath($volume, $directory, $file); 

Answer 2

P: ¿Qué separador de ruta debo usar para permitir que mi script funcione tanto en Windows como en Unix?

A: /.

 
Explanation: 
Windows can work similarly to Unix with/as path separator. 
(Mac OS uses : as a path separator instead of /). 

The File::Spec modules can also help. 

    use File::Spec::Functions; 
    chdir(updir());  # go up one directory 
    $file = catfile(curdir(), 'temp', 'file.txt'); 
    # on Unix and Win32, './temp/file.txt' 
    # on Mac OS, ':temp:file.txt' 
    # on VMS, '[.temp]file.txt' 

Source: 
http://www.xav.com/perl/lib/Pod/perlport.html 

Answer 3

¿Quieres File::Spec. Hay versiones específicas para Unix, Win32 y MacOS, así como others.

Answer 4

Parece que está utilizando el separador de ruta para indicar el carácter entre los componentes de directorio/nombre de archivo. Pero por si acaso quisiste decir el otro significado:

Algunas cosas (especialmente variables de entorno como MANPATH o PERL5LIB) toman una lista de nombres de archivos o directorios, separados por un carácter separador de ruta. El módulo de configuración de Perl proporciona portablemente un carácter como $ Config :: Config {'path_sep'}.

Answer 5

Si encuentra File :: Spec engorroso, como yo, tratar Path::Class. Le proporciona objetos de directorio y archivo para trabajar, en lugar de tener que llamar a largos métodos File :: Spec class en cadenas.