Datei- und Verzeichnisnamen umwandeln - #104309 (Allgemeines zu Perl)

Strat

2008-12-31 13:07

User since
2003-08-04
5246 Artikel
ModeratorIn

tuxstef+2007-12-30 21:32:33--
Gibt es da eine Funktion zum automatischen escapen von diesen grauslichen Leerzeichen und "Sonder-Hakel"?

Ja, und zwar sogar eins, das die ganzen Betriebssystem-Unterschiede kennt. Es nennt sich CPAN:

File::Spec und ist im Perl-Core dabei.

Code (perl): (dl )

1
2

my $file = File::Spec->catfile( $dir1, $dir2, $filename );
my $dir = File::Spec->catdir( $dir1, $dir2 );

wenn ich z.B. fuer ein Script ein eigenes Modulverzeichnis habe, das in ../lib liegt, dann fuege ich das folgendermaszen zu @INC hinzu:

Code (perl): (dl )

use FindBin;
use File::Spec;

use lib File::Spec->catdir( $FindBin::Bin, '../lib' );

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/