Re: Show perl source on web page

2002-01-07 Thread Vilius Gaidelis
Try this: www.palfrader.org/code2html/ Vilius Gaidelis - Original Message - From: Robert Davis <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Monday, January 07, 2002 4:25 PM Subject: OT: Show perl source on web page > Sort of offtopic. This is the only way I was able to come u

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Dunnigan,Jack [Edm]
If you are inserting something programmatically, then why not check it before you insert :) Anyways, it doesn't do that for me? Run this script and tell me what it does.. ## use Tk; use Tk::LEntry; use strict; my $max=10; my $status="HELLO"; my $mw=new MainWindow; my $e=$m

Re: Widget dimensions, compared to a string?

2002-01-07 Thread Martin Moss
- Original Message - From: "John Deurbrouck" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Cc: "Martin Moss" <[EMAIL PROTECTED]> Sent: Monday, January 07, 2002 7:54 PM Subject: Re: Widget dimensions, compared to a string? > > I wish to compare the length of a window to the length of a str

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Adam Frielink
> -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On Behalf Of > Dunnigan,Jack [Edm] > > > >-Original Message- > >From: Adam Frielink [mailto:[EMAIL PROTECTED]] > >Sent: Monday, January 07, 2002 12:16 PM > > >Thanks Jack. I guess I wasn't specific enough

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Dunnigan,Jack [Edm]
>-Original Message- >From: Adam Frielink [mailto:[EMAIL PROTECTED]] >Sent: Monday, January 07, 2002 12:16 PM >Thanks Jack. I guess I wasn't specific enough in my original post to say >that I cannot allow an entry of more than 75 characters and not an entry box >of 75 character width. If

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Adam Frielink
Thanks Jack. I guess I wasn't specific enough in my original post to say that I cannot allow an entry of more than 75 characters and not an entry box of 75 character width. If I can't find it, I will email you. Adam Frielink Tyco Plastics > -Original Message- > From: Dunnigan,Jack [Edm

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Swartwood, Larry H
Upon reading your question a second time, I think I misunderstood. I don't see where Entry() supports a callback function. One way around that is to test $my_var later: if( length( $my_var) > 75) { # Prompt the user to re-enter the value ... } Larry S. -Original Message- From: Swa

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Dunnigan,Jack [Edm]
You will need to use -validatecommand -- or -- Nick Ing-Simmons wrote a small package called LEntry (Limited? Entry) which does exactly this. It is derived from and ISA Tk::Entry. All it does is add a new option to the Entry configspecs called -maxwidth. Then overrides the insert method to check

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Tillman, James
> $entry->Entry( -textvariable => \$my_var, -width => 75); > > http://w4.lns.cornell.edu/~pvhp/ptk/doc/ ...where the documentation states: Name: width Class: Width Configure Option: -width Specifies an integer value indicating the desired width of the entry window, in average-size character

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Swartwood, Larry H
Oops. Forgot the all important pack(). Should be: $entry->Entry( -textvariable => \$my_var, -width => 75)->pack(); Sorry, Larry S. -Original Message- From: Swartwood, Larry H Sent: Monday, January 07, 2002 12:03 PM To: 'Adam Frielink'; [EMAIL PROTECTED] Subject: RE: Perl/Tk Entry widg

RE: Perl/Tk Entry widget questions

2002-01-07 Thread Swartwood, Larry H
$entry->Entry( -textvariable => \$my_var, -width => 75); http://w4.lns.cornell.edu/~pvhp/ptk/doc/ Larry S. -Original Message- From: Adam Frielink [mailto:[EMAIL PROTECTED]] Sent: Monday, January 07, 2002 12:00 PM To: [EMAIL PROTECTED] Subject: Perl/Tk Entry widget questions Greetings,

Perl/Tk Entry widget questions

2002-01-07 Thread Adam Frielink
Greetings, Here is a simple one, does anyone know how to limit the length of a Entry widget in Tk to be no more than 75 characters? Will this require a Validate callback, or is there an option that can be setup when I create the Entry widget? Thanks, Adam Frielink Tyco Plastics _

Re: Widget dimensions, compared to a string?

2002-01-07 Thread John Deurbrouck
> I wish to compare the length of a window to the length of a string of text. > The text would be in x characters long, but widget window width would be in > pixels or millimeters. In Win32, the proper API is GetTextExtent() or GetTabbedTextExtent(). There's also GetOutputTextExtent() and GetO

SMTP Server requires authentication

2002-01-07 Thread Riva S
Using Mail::Sender, I get "Server error: 505 Authentication required" when trying to send email, which I understand to mean that my SMTP Server requires authentication. After searching and finding nothing positive on this issue, I was wondering about the final word on this: can I use Perl to se

RE: Calling a Perl Program Within the Middle of Another Perl Program

2002-01-07 Thread Cornish, Merrill
Inside test.pl, add this statement my $listing = `perl test2.pl`; # NOTE: those are backticks where $listing will be whatever test2.pl wrote to STDOUT and the exit code of test2.pl is in $?. If test2.pl needs arguments, you can add them after test2.pl. Merrill ___

Re: Calling a Perl Program Within the Middle of Another Perl Program

2002-01-07 Thread Jeffrey
Use the system call if you don't want to capture output: system "test2.pl"; Use backticks if you want the output: @results = `test2.pl`; --- [EMAIL PROTECTED] wrote: > Sorry for the newbie questionbut how do I > include a perl program within > another perl program? > > I have test.pl and I

Get Current URL in IE

2002-01-07 Thread Brian Shade
Hi everyone. I was wondering if anyone knows how I could get the current URL in IE. I know how to launch IE with OLE and specify a website for it to go to, but I do not know how to get the current URL. Any help would be greatly appreciated. Thanks for your help in advance. Brian ___

Calling a Perl Program Within the Middle of Another Perl Program

2002-01-07 Thread gregory . john . toland
Sorry for the newbie questionbut how do I include a perl program within another perl program? I have test.pl and I want to call within test.pl test2.pl. Gregory J Toland Sr. Systems Architect CHM, Inc. (301) 457-8058 [EMAIL PROTECTED] ___ Perl-Win

Re: Show perl source on web page

2002-01-07 Thread David Kaufman
Robert Davis [mailto:[EMAIL PROTECTED]] wrote: > > Sort of offtopic. This is the only way I was able to come up with to > show perl source on a web page. Anybody have any other methods? > I found the tag. Is there another tag that ignores tags? I did a > sub for < and > when in a print statement.

Re: Show perl source on web page

2002-01-07 Thread Robert Davis
Thanks too all for the help. As usual I didnt even think of the security problems. Somehow security is left to last. bob Morse, Richard E. wrote: >A slightly more trivial example would be this: > >#!/usr/bin/perl -w >use strict; > >print "Content-type: text/plain\n\n"; >my $fn = $ENV{'QUERY_STR

Re: Child processes: Searching a large drive

2002-01-07 Thread Marcus
On 06.01.02 at 23:09 $Bill Luebkert wrote: >Breaking it up into several processes will just cause your heads to >bang back and forth since the different processes will be working >on different areas of the disk. Ouch, I hadn't thought of that. >Before you do that, you should strip your code to t

RE: Show perl source on web page

2002-01-07 Thread Morse, Richard E.
Sorry for the lack of security -- I was basing my file selection mechanism on the one that the original poster had been using. I agree with you that it is rather unsafe. In fact, I would create a hard-coded (or read from a secure location on the local FS) list of all allowed files, and if the re

RE: Widget dimensions, compared to a string?

2002-01-07 Thread Martin Moss
Cheers Guys!!! Thanks for your help, Marty > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED]]On Behalf Of > [EMAIL PROTECTED] > Sent: Monday 07 January 2002 15:56 > To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; > [EMAIL PROTECTED] > Subject: RE: Widget dimensions,

RE: newbie question splitting a string into tokens

2002-01-07 Thread Peter Eisengrein
I remember seeing something similar done with eval() but I couldn't figure out how. Anyone know how? > -Original Message- > From: Markus Rakowski [mailto:[EMAIL PROTECTED]] > Sent: Saturday, January 05, 2002 03:24 > To: [EMAIL PROTECTED] > Subject: RE: newbie question splitting a string