Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: Cookies

From: rick_falls::hotmail at: 9-Feb-2002 17:35

Here is a cookie script I wrote awhile back. It could be expanded and improved. *********************************************************************** ;REBOL [ Title: "Cookie Cleaner" Date: 18-Jul-2001/21:56:30-4:00 Name: "Cookies" Version: 1.0.0 File: %cookies.r Author: "A Rebol" Purpose: {Removes unwanted cookie files from windows system.. note files are permanently deleted! can be used to search and clean files from any folder. Just change line that reads (files: read %/c/windows/cookies/) to something like (files: read %/c/windows/temp).Type .txt at the search prompt and search for all text files in temp folder. Script is run from the folder you wish to clean. Just started writing scripts haven't got the path thing down yet. } Email: [rick_falls--hotmail--com] Category: [file] ] word: "" count: 0 files: read %/c/windows/cookies/ ;location of cookies folder on my system(change to location of your folder if needed) print join length? files { cookies in folder ^/ To use enter a search word. Example entering (Rebol) could return [yourname--www--rebol--com][1].txt. You will be prompted If you would like to delete this cookie. If you wish to delete cookie type (yes) then hit enter. If not just hit enter cookie will not be deleted. If search word is not found no results will be returned. Type a new search word or (quit) to exit. ^/} ;print number of cookies in folder (about 1200 on mine) while [word <> "quit"] [ count: count + 1 print join "Search number " count word: ask "Enter search word or quit to exit " foreach file files [ if find file word [ print file testword: ask "To delete type yes or hit enter to continue ^/" ;double check before deleteing file if testword = "yes" and exists? file [ delete file change find files file " "] ;delete file and remove entry from list in variable(word) files ] ] ]
>From: Joe Seeder <[seeder--sscdesigned--boo--pl]> >Reply-To: [rebol-list--rebol--com] >To: Rebol-list <[rebol-list--rebol--com]> >Subject: [REBOL] Cookies >Date: 09 Feb 2002 13:01:10 +0100 > >hi > >how can I access cookies, which ware send to me ? > >-- >To unsubscribe from this list, please send an email to >[rebol-request--rebol--com] with "unsubscribe" in the >subject, without the quotes. >
_________________________________________________________________ Send and receive Hotmail on your mobile device: