sonderzeichen in dateipfad escapen - #65418 (Allgemeines zu Perl)

Strat

2006-05-06 02:15

User since
2003-08-04
5246 Artikel
ModeratorIn

oder wenn's in die shell gehen soll:

Code: (dl )

use File::Spec;
my $dir = File::Spec->catfile("c:", "Dokumente und Einstellungen");
my @output = `dir "$dir"`; # mit anfuehrungszeichen
print @output;

oder bei system die listenform verwenden (ist eh meistens auch schneller als die mit einer zeiche, weil da fast immer auf die shell verzichtet werden kann):

Code: (dl )

1
2
3

use File::Spec;
my $dir = File::Spec->catfile("c:", "Dokumente und Einstellungen");
system('dir', $dir);

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