Forgot to forward to the list, sorry again
-- Forwarded message --
Date: Fri, 6 Sep 2002 15:19:58 +0530 (IST)
From: Sudarshan Raghavan <[EMAIL PROTECTED]>
To: Fabian Funk <[EMAIL PROTECTED]>
Subject: Re: Reading Directory
On Wed, 4 Sep 2002, Fabian Funk wrote
opendir DIR,
while (defined(my $file=readdir(DIR))) {
next unless $file=~/\.mp3$/i ;
push(@files,$file);
}
works for me.
Omanakuttan N,
C,C++,Networking, perl, Linux
Tata Elxsi Ltd,
ph.8410 222 x 414.
---
' ...follow me' ,
bian Funk [mailto:[EMAIL PROTECTED]]
> Sent: 04 September 2002 20:42
> To: [EMAIL PROTECTED]
> Subject: Reading Directory
>
>
> Hi, I'm pretty new to perl. I want to open a Directory with
> mp3 files an
> other files. My Poblem is i need only the mp3 files. How can
Fabian Funk wrote at Wed, 04 Sep 2002 21:41:54 +0200:
> Hi, I'm pretty new to perl. I want to open a Directory with mp3 files an
> other files. My Poblem is i need only the mp3 files. How can i get only
> the mp3 files and not other files ?
>
> I tried:
>
> while (defined(my $file=readdir(DIR
On Wed, Sep 04, 2002 at 09:41:54PM +0200, Fabian Funk wrote:
> Hi, I'm pretty new to perl. I want to open a Directory with mp3 files an
> other files. My Poblem is i need only the mp3 files. How can i get only
> the mp3 files and not other files ?
>
> I tried:
>
> while (defined(my $file=readd
Hi, I'm pretty new to perl. I want to open a Directory with mp3 files an
other files. My Poblem is i need only the mp3 files. How can i get only
the mp3 files and not other files ?
I tried:
while (defined(my $file=readdir(DIR))) {
next if $file=~ /^\.\.?$/;
next unless /\.[mp3]
