Path :: Tinyのファイルを除外ルックアヘッド正規表現を使用して除外

Question

Path::Tinyを使用しています。オプションのQR //引数が指定されている場合にのみ与えられた正規表現に一致 子名のオブジェクトを返し、

@paths = path("/tmp")->children(qr/\.txt$/); 

：childrenとして使用することができます：それは方法があります。ベース 名前が

を一致させるために使用されているだけなので

@paths = path("/tmp")->children(qr/\A(foo|bar|baz)\z/); 

は/tmpで見つかったfoobarbazファイルのいずれかを返します。

私は逆を必要としますが、ファイルはありませんが、(foo|bar|baz)は必要ありません。

以下は、不要なものを除外することができ、

@paths = grep { $_->basename !~ /^(foo|bar|baz)$/ } path("/tmp")->children; 

それについてqrを作成する方法を疑問に思います。

だから、質問：任意のファイルが、ないfoo|bar|baz：どのようにするためにqr式を作成するには？

私は否定先読みに

path(...)->children(qr/\A (?!(foo|bar|baz)) \z/x); 

を試みたが、それは私はそれが:)やるべきだと思う何をしません - 例えば私の正規表現は間違っています。

Answer 1

\z内の負の先読み

qr/\A(?!(?:foo|bar|baz)\z)/