Recent content by Ati2ude

I have a off the wall request, does anyone know of a method to compress a given set of files on a windows box, without having an app to do so. I know how to make this happen on a Unix box, but not windows. Also I can not install any 3rd party apps on the box. Thanks in advance, Ati2ude

Thanks, that was the issue, in case anyone needs a work around here it is. set savefile_list [glob -nocomplain -directory $process_dir *.* -types f] set file_name [file tail $savefile] Thanks for your help. Ati2ude

I have the following line: set savefile_list [glob -nocomplain -tails -directory $process_dir *.idx] when executed I get: Error: bad option "-tails": must be -directory, -join, -nocomplain, -path, -type s, or -- while executing "glob -nocomplain -tails -directory $process_dir *.idx" Am I...

Never mind I see what you are saying. Let me play with this a few. Thanks for the quick reply. Ati2ude

Will the glob command give me a listing of sub-directories only? I need the sub-dirs first. Ati2ude

Hi all, I have tried this several ways and can not seem to get what I am looking for. What I want to do is create a list of sub directories under a specified directory. I will then iterate thru each of them, looking for specific files. Here is what I have tried. set processdir [concat...

Barny Do you have any with ARGS? i.e.. myscript.vbs arg1 arg2 etc...

I am having problems making the script execute at all. Do I need to call the wscript.exe before calling my script? i.e.. c:\windows\system32\wscript.exe myscript.vbs Thanks

Has anyone ever had to run a VBS from the Windows Scheduler? If so can you give some pointers? Thanks in advance, Ati2ude

Anyone every heard of this command? If so do you have any documentation on it. I came across it in use in our environment and can't seem to find any info on the use of it. Thanks in advance, Ati2ude

I am testing your first example currently, Thanks for the pointers. I do not claim to know perl but must support a few scripts to survive. Thanks for the help, I will let you know the outcome. Brian

Thanks for the quick reply! I did make the changes you suggested, but have one another question. Do I leave spaces between the pipes and the rest of the statement? I have pasted the actual code below for your review. if ($ckfilename ne ".edi")||($ckfilename ne ".EDI") { ($merr=1;$e2=1;) }...

I am new to Perl and am trying to modify a script. What I have is an if statement that is checking for a single condition like so: if {$filename ne ".txt"} {$merr=1;$e2=1;} What I would like to do is something like this: if {$filename ne ".txt"} || {$filename ne ".TXT"} {$merr=1;$e2=1;}...

I utilized your suggestion and am now getting the result I am looking for. Thanks again for your assistance here. TCL is not my primary language so I end up stomping my way through the language and often over look built in functions that would make my life easier. Brian

Here is what I have thus far, I am sure it can be cleaned up greatly if I knew some function to handle my string date. Thanks again BONG for any pointers. #now that we know the date is not null and the message #qualifies to be here we need to do some work on the #date we have in the message...