Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
Perl, Tk and ROText widget, how to force a print/insert?
If the focus and update lines are added after a $t->insert, it appears to be similar to adding the $|=1 to clear the buffer in perl. Everything earlier is printed or in this case, inserted into the ROText widget. I've been playing with Tk for less than a month so I cannot give a good answer... -
Perl, Tk and ROText widget, how to force a print/insert?
I found the solution. Need to add $t -> focus; $nb1 -> update; after a $t->insert.... -
Perl, Tk and ROText widget, how to force a print/insert?
Background: Windows environment; using SAMIE for regressive testing of website; depending upon number of choices selected, a run can take over 30 min; disconcerting to QC folks to see nothing for half an hour; This code: only the "Start testing" and "Exit" buttons are live. When the following... -
Perl, Tk and ROText widget, how to force a print/insert?
Hello Everyone: With Perl, I can clear buffers and force print using $| = 1; How can I force a print/insert in perl::tk in a rotext widget? At the moment, all the inserts occur at the end of the program. I would like to have the inserts occur through out the run rather than at the end... -
Maybe something simple can be done with a hash
As long as the order of your list is consistent, this works # tek-tips thread219-407527 use diagnostics; @x = qw( /a1/a.html /a1/b.html /a1/g.html /a1/x/d.html /a1/x/e.html /a1/x/r.html /a2/d.html /a2/c.html /a2/r.html /a2/x/h.html /a2/x/f.html /a2/x/w.html... -
Help with Regular Expressions
If the format of the string is always the same, try #!/c:/perl/bin/perl.exe # splitting a string on _ use diagnostics; $line = 'aaa_A43.bbb11_07172002_00.ab.err'; (undef,undef,$wanted,undef) = split('_',$line); print "$wanted\n"; -
Extract data from files using pattern matching
Using PerlIsGood expression, try #!/user/local/bin/perl use diagnostics; # I stuck your file example here $log_file = "e:/perl practice/regexp/tek_tip_file.txt"; open(INFO, $log_file) or die "could not open tek_tip_file.txt: #!"; @lines = <INFO>; close(INFO); foreach... -
DATA BASES CHOICE ACCESS,FOXPRO,OTHER
Take a look at http://www.iam.unibe.ch/~scg/Archive/Software/FreeDB/FreeDB.list.html- Parke
- Post #5
- Forum: Visual Basic (Classic)
-
Type mismatch' was not handled
Saweens: You may need to change from type variant to a subtype such as int or double using cint or cdbl before you pass your variables. HTH Parke -
A newbie question on hashes
Jim: Only that I am very new to Perl and learning. Thanks for pointing out that Neil's example does answer the question. Again thanks for the help, Parke -
A newbie question on hashes
Neil, Coderifous: Each line of the log file will look along the line of "182.170.34.202", "b9245acd231234as" and lots of additional junk and there might be 30,000 lines/IDs to extract. The second set of quotes is the ID that I am extracting from each line of the log... -
Perl and Access
In case anyone is interested: #! /d/program files/perl/bin/perl use OLE; use warnings; print ("\tADO DSN-Less to pubs database on local MS Access database. \n"); print "\n"; # Create ADO auto object $conn = CreateObject OLE "ADODB.Connection" || die... -
A newbie question on hashes
While reading a log file, I am selecting an ID using reg exp and inserting the ID into a hash as the key and setting the value = 1. The nice thing about using a hash is that it filters out the duplicate ID values. If I wanted to be able to count the number of times each ID occurs, how can I... -
ReGExp for string compare
The backslash in RegExp has a special meaning. Your pattern probably needs a two backslashes \\. See http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/jsgrpregexpsyntax.asp Take a look at http://regexlib.com/default.aspx. Site has a number of examples of patterns... -
Perl and Access
Mike: Thank you very much. Now I can play with it to see how it works. Parke -
Perl and Access
I use ADO a fair bit in vbscript and vb programs. It is very convenient to write a program and be able to run it on any windows machine and not worry about having to first set up the ODBC connection. The best URL I've found for ADO connection strings is... -
Perl and Access
Mike Lacey's FAQ is well done. Thanks for the reference. Do you know of anything similar showing how to use ADO and a dns-less connection? Thanks, Parke -
Win 2K, multiple processors
We are attempting to set up Win 2K, advanced server with 4 Xeon 1.6 MHz cpus and 8G Ram. The server is "telling" us that we have 8 cpus and 4G Ram. Are we doing something wrong? This is a fresh install. Any and all help appreciated. This is my first multiprocessor Xeon box...- Parke
- Thread
- Replies: 2
- Forum: Microsoft: Windows servers
-
Procedures and Arrays
Mighty: Arrays are automatically passed byref. So pass the array, change the row as required and it is done. ' tblPractice has fields, startdate (datetime), istudents (number), ' tclassroom (text), ID (autonumber) ' I inserted three records Dim cn Dim rst Dim myarray Const adStateOpen = 1... -
Procedures and Arrays
Yes, an array can be passed Call initialArray() ' ======== Sub initialArray() Dim myArray(3) For i = 0 to 3 myArray(i) = 5 + i Next s = "inital array" for j = 0 to 3 s = s & vbcrlf & myArray(j) Next Call changeArray(myArray,s) msgbox s End Sub ' ========== Sub...
