perlunity.de - PERL | JAVASCRIPT | PHP | MySQL | APACHE



#!/COMMUNITY

Members: 5374
davon online: 1
weitere User: 20
Click for quality!




11.02.2012 / 20:07

Community-Member werden   |   Paßwort vergessen   |   OnlineMonitor (1) Wer ist online ... OnlineMonitor starten !
     

 

Home


PERLscripts


PHPscripts


JAVAscripts


Hilfreiches


Links2www


Newscenter


Community


Interna




Community  »  Perl: Allgemeines Forum zur Themenübersicht Themensuche Themenansicht in Thread-Modus


Beitragjpg aus einem Ordner auslesen
Seitenanfang
Hallo,

ich habe folgendes Problem. Ich muss auf einen bestimmten Ordner zugreifen und in diesem Ordner alle jpg-Dateien zählen! Aber nur die jpg's die mit sh$id beginnen. Bitte um Ratschläge!!

Datum: 27.07.2006-08:40

Beitragre: jpg aus einem Ordner auslesen
Seitenanfang
Hallo,

das kannst Du einfach über ein grep machen

my @jpgs=</pfadzujpgs/sh$id*.jpg> ;
my $menge=$#jpgs+1 ;

das wars :-)

Mfg
Marky

Datum: 27.07.2006-08:53

Beitragre: jpg aus einem Ordner auslesen
Seitenanfang
Danke für die Antwort!

Funktioniert aber noch nicht,

$wid = 1;
my @jpgs=</*.*/"sh$wid"*.jpg>;
my $menge=$#jpgs+1;

jetzt müsste er doch alle jpg-Dateien im gleichen Ordner, die mit sh1 beginnen finden, oder!

Datum: 27.07.2006-09:08

Beitragre: jpg aus einem Ordner auslesen
Seitenanfang
my $dir= '/path/to/directory';

opendir(DIR,$dir) or die $!;
my @jpgs = grep{$_ =~ /^sh\$id/ && $_ =~ /\.jpg$/}readdir(DIR);
closedir DIR;
print scalar(@jpgs);

Datum: 27.07.2006-10:44

-






-
-