in reply to matching file names using regex

    /^test(?=\d).*[^~]$/

[download]
Abigail

In Section Seekers of Perl Wisdom