Well, I sponsor the Loebner Prize. You might check it out.
There have been a number of talented programmers who have entered.
HL
On 4/20/06, bruce [EMAIL PROTECTED] wrote:
Hi..
Has anyone heard of compaines who hold programming contests as a way of
finding potential programming talent??
Assume $line has one line of data
$line =~ /( .{28} )( .{27} )( .*$)/ ;
$1 will have first 28 characters
$2 will have next 27 character
$3 will have the rest of the characters to end of line
HL
On 11/6/05, RIG [EMAIL PROTECTED] wrote:
Hi everybody:
I need to split a line that contains
Initialize $j = 0 ;
$textcomplete=Mary has a little lamb\nMary has a little lamb which is black!;
$i=0;
@textinlines=split(/\n/,$textcomplete);
foreach(@textinlines){
print $i:$textinlines[$i]\n;
@textinchars=split(//,$textinlines[$i]);
$j = 0 ;
Sorry, the end was truncated. Here's the whole program
#---
use strict ;
use Tk ;
my $mw = MainWindow - new() ;
my $logw = $mw - Scrolled('ROText') - pack ;
my %cell ;
for my $col (0 ..3){
for my $row (0 .. 5){
$cell{$col}{$row} = $logw - Label( -text =
Try the following short program ;-)
use strict ;
use Tk ;
my $mw = MainWindow - new() ;
my $logw = $mw - Scrolled('ROText') - pack ;
my %cell ;
for my $col (0 ..3){
for my $row (0 .. 5){
$cell{$col}{$row} = $logw - Label( -text = *$col $row* ,
.
A few suggestions: I almost always use form rather than pack for
positioning an object - it's much more powerful and, for me, more
logical. Grid is also very useful for presenting tabular material.
I usually use grid with a Scrolled Pane rather than the gibberish.
Hugh Loebner
Hi,
I've
I meant to conclude with::
I usually use grid with a Scrolled Pane rather than the gibberish
that Lidie and Walsh present for having one scrollbar with multiple
widgets. pp 147-148..
On 8/2/05, Hugh Loebner [EMAIL PROTECTED] wrote:
What parts of Tk are you having trouble understanding?
I
Why on earth are you using a goto statement? They are pernicious.
HLOn 7/12/05, Dave Ressler [EMAIL PROTECTED] wrote:
I have noticed a change in behavior in goto
statements recently. Whereas a statement like goto PLACE; would work fine no
matter where PLACE:was in my code, I've noticed
I doubt this.
Please provide an example.
HLOn 7/13/05, Michael Erskine [EMAIL PROTECTED] wrote:
On Wednesday 13 July 2005 13:30, Hugh Loebner wrote: Why on earth are you using a goto statement? They are pernicious.On the contrary, a goto is often most appropriate in expressing clear programflow
Erskine [EMAIL PROTECTED] wrote:
On Wednesday 13 July 2005 13:30, Hugh Loebner wrote:
Why on earth are you using a goto statement? They are pernicious.
On the contrary, a goto is often most appropriate in expressing clear program
flow.
Regards,
Michael Erskine
--
Kinkler's First Law
handle $fh{$fhkey} has to be in a
block
} ;
foreach my $fhkey ( keys %fh ){
close $fh{$fhkey} ;
}
#
Hugh Loebner
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
My thanks to all for their prompt and very helpful replies.
Hugh LoebnerOn 6/27/05, Hugh Loebner [EMAIL PROTECTED] wrote:
Hello all,
How do I get the path name of the current directory?
In other words, how can I find out the name of the folder in which a program is executing?
Thanks,
Hugh
Hello all,
How do I get the path name of the current directory?
In other words, how can I find out the name of the folder in which a program is executing?
Thanks,
Hugh
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To
Jeff, why not get permission from the govt?
HughOn 6/10/05, jeff griffiths [EMAIL PROTECTED] wrote:
On Fri, Jun 10, 2005 at 10:18:10AM -0400, Charles Maier wrote: I am having some problems getting hold of and installing Crypt::Ssleay. I found the Winnipeg repository has the module and Activestate
I had exactly the same problem and questions a week ago.
Mathieu Longtin was kind enough to post the solution.
I added the winnipeg site as a repository. It took two steps
1.
ppm
To start ppm
2. add rep http://theoryx5.uwinnipeg.ca/ppms/ To add the repository
Everything worked like a charm
Sorry, neglected the last step:
3. install Crypt-SSLeayOn 6/10/05, Hugh Loebner [EMAIL PROTECTED] wrote:
I had exactly the same problem and questions a week ago.
Mathieu Longtin was kind enough to post the solution.
I added the winnipeg site as a repository. It took two steps
1.
ppm
To start
the message I
mentioned:
No suitable installation target found
for Crypt::SSleay
What
does this mean?
Chuck
-Original Message-From: Hugh Loebner
[mailto:[EMAIL PROTECTED]] Sent: Friday, June 10, 2005 11:45
AMTo: Charles MaierCc: Perl-Win32-Users Mailing
ListSubject: Re: Ppm
Don't all the internet browsers use these routines?
Does this mean that it will be forever impossible for a Canadian
company to offer for download a secure Canadian produced web
browser?
If so, this seems like a good lever to change the law. Eg.
Canada will forever be a backwater of internet
How about using a hash?:
use strict ;
my $x;
my %wanted ;
foreach (qw( word1 word2 whatever this that the-other) ){
$wanted{$_}= 1;
} ;
$x = 'the-other' ;
if( $wanted{$x} ){
print found $x\n ;
}
else{
print can't find $x\n ;
} ;
$x = 'no-go' ;
if( $wanted{$x} ){
not find the path specified error.
HL
--- Andrew Timberlake-Newell [EMAIL PROTECTED]
wrote:
On 29 Mar 2004 at 9:03, Hugh Loebner wrote:
I can get perl to write a text file 'xyz.txt' to disk with
no problem,
but I don't know how to actually get my preferred printer
to actually
/?
Prints a text file.
PRINT [/D:device] [[drive:][path]filename[...]]
/D:device Specifies a print device.
-Original Message-
From: Hugh Loebner [mailto:[EMAIL PROTECTED]
Sent: Monday, March 29, 2004 12:03 PM
To: [EMAIL PROTECTED]
Subject: Printing a text file
21 matches
Mail list logo