Recent content by pbatt

Hello, I'm pretty efficient with PERL but have never done any DB interfacing and am faced with a problem in which I need to query one of the Oracle DB's at work. I'm wondering where is a good place to start to learn querying of Oracle DB's with PERL without having to sort through too much...

Hi, I have some buttons that I would like to make SMALLER than the default size of a button in Perl/Tk and found the option for -width and -height, however, that is only to make the button larger. I've tried decimals, and negative numbers but nothing seems to work to shrink the buttons. Any...

That worked! Again, thanks very much! I'm going to try and stay away from posting questions...could make me very lazy ;)

Did this: sub getbutton{ print "It got here\n"; system('app2.pl'); print "But not here\n"; } Both statements printed? It got here But not here

Hmmm. It didn't do anything at all?

So maybe... $button = $lowerframe -> Button( -text=> "text", -background=>"lightgrey",-foreground=>"black",-command=>\&getbutton, ) and... sub getbutton{ system('app2.pl'); }

When I try that, I get a Tk:Error, undefined subroutine &main...(command bound to event) Any ideas? What do you mean by forks a child then execs perl w/ app2?

What do you want it to do once it reads the links from the command line?

Hi, Has anyone ever launched an application from inside another application with the use of a button? Does that make sense? I have 2 applications, say "app1.pl", and "app2.pl". I would like to launch app2.pl from a button in app1.pl. Both are Perl/Tk stand alone apps. Here's what I thought...

Ok, I'll check it out. Thanks again for the help!

Ok, got it working. Still getting a "Use of uninitialized value in pattern match at line..." Had to add an extra -\d\d since there is a date and month field. I'll ignore that error since I'm getting the result I want, is that bad? Thank you very much for your help!

By default m// will search in $_, right? When I use that, I get a "Use of uninitialized value in concatenation (.) or string at..." Do you know what this means?

Does this make sense, I'm a little confused on how to assign the pattern match: $_ = /(\d\d\d\d-\d\d-\d\d\s+\d\d:\d\d:\d\d\.\d)/; print "$_\n"; Or should I add the /(\d\d.....)/ to an 'if' statement, and print $1?

Ok, the string match makes clear sense, but what do you mean when you refer to S1? Thank you!

Hello, I'm searching through a generated file of HTML code and am trying to abstract a date. Basically, I begin by encapsulating a small portion of the file using 'until' knowing that there are 2 strings guarenteed to be there. The date is of the format 2005-09-21 07:45:19.0 Can anyone...