[REBOL] simple, yet frustrating Re:
From: rebol::techscribe::com at: 25-Sep-2000 17:36
Hi Tom,
gz.bak
certainly contains the patter "*.gz", so you shouldn't be too
surprised that it qualifies for find.
I have to run, but one quick and dirty way to accomplish what you're trying
to do would be to say:
bak-pattern: "*.gz.bak"
pattern: "*.gz"
if all [
find/match/any file pattern
not found? find/match/any file bak-pattern
]
[
do whatever it is you must do ...
]
At 07:11 PM 9/25/00 +0100, you wrote:
>howdy list,
>
>This doesn't seem to be the time to be asking *really* easy
>questions, but I'm frustrated enough to go for it anyway.
>
>this is ftpdownload.r, sans the interactive part.
>
>site: ftp://ftp.rebol.com/pub/downloads/
>
>pattern: "*.gz"
>
>files: read site
>
>foreach file files [
> if find/match/any file pattern [
> write/binary file read/binary site/:file
> ]
> ]
>
>what I can't seem to do is have this fetch "*.gz" files, but not "gz.bak"
>files. I don't want the backups (later, I'll modify this to delete them).
>of course, the site and pattern have been changed to protect the innocent.
>
>thanks for your patience...
>
>--
>
>Spend less time composing sigs.
>-tom
>
;- Elan [ : - ) ]
author of REBOL: THE OFFICIAL GUIDE
REBOL Press: The Official Source for REBOL Books
http://www.REBOLpress.com
visit me at http://www.TechScribe.com