because you aren't in the dir... you would need

chdir($dir) or die "can't chdir to $dir: $!\n";
before all that to work. and that should be
unlink or die "$_: $!";

> -----Original Message-----
> From: Jaime Hourihane [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, July 09, 2002 9:58 AM
> To: [EMAIL PROTECTED]
> Cc: [EMAIL PROTECTED]; [EMAIL PROTECTED]
> Subject: Re: Regex exception
> 
> 
> or what about unless...
> 
> opendir(DIR, $dir) || die ..
> while(<DIR>) {
> unless ~= $pattern {
>        unlink or remove here
> }
> 
> }
> 

----------------------------------------------------------------------------
--------------------
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to