or what about unless... opendir(DIR, $dir) || die .. while(<DIR>) { unless ~= $pattern { unlink or remove here }
} -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
or what about unless... opendir(DIR, $dir) || die .. while(<DIR>) { unless ~= $pattern { unlink or remove here }
} -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]