Path Question

[leke]

Hi all,
I am learning about Paths at the moment.

Code:

read %.

which gives me a list of all the files in my REBOL folder.

I wanted to see if I could output only certain types of files, so I tried

Code:

read %.r

and got an error.
How could I do 'wildcard' style searches.

[CarlRead]

I don't think there's any way to do wildcard searches using READ, but FIND allows them using the /ANY refinement.  So you could use something like this...

Code:

files: read %.
matched: []
foreach file files [if find/any file %*.r [append matched file]]
probe matched

Which would perhaps be best turned into a function...

Code:

dir-find: func [
   "Select files in a directory using a wildcard."
   dir [file!] "Directory path."
   match [file!] "Wildcard.  ie., %*.txt %pic??.jpg"
   /local files matched
][
   files: read dir
   matched: copy []
   foreach file files [if find/any file match [append matched file]]
   matched
]

(Hope that behaves - not extensively tested.)