sonderzeichen in dateipfad escapen (Seite 3) (Allgemeines zu Perl)

[thread]7932[/thread]

sonderzeichen in dateipfad escapen (Seite 3)

Leser: 1

Strat

2006-05-06 02:11

User since
2003-08-04
5246 Artikel
ModeratorIn

@renee: stimmt leider

dafuer aber koennen opendir, File::Copy usw. koennen wunderbar mit leerzeichen umgehen, wenn man es korrekt angibt... z.B. mit File::Spec:

Code: (dl )

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

opendir (my $DIR, $dir) or die $!;
my @files = readdir($DIR);
closedir($DIR);
print "@files\n";

\n\n

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

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/

vayu

2006-05-07 22:08

User since
2005-01-13
782 Artikel
BenutzerIn
[default_avatar]

danke für die tips. ich denke das könnte mir in zukunft ne menge stress ersparen!

"imitation is the sincerest form of flattery."
- Lee Anthony Iacocca
http://img156.imageshack.us/img156/2056/perluserba...
http://img410.imageshack.us/img410/2664/tcmduserba...

View all threads created 2006-04-30 15:51.