Win32::Pipe returns memory address

Friday: running Active Perl build 613 and the version of win32::pipe that comes with that distribution. Tried running the test scripts, these fail to disconnect the pipe and sends the server scripts spinning in to a loop. Monday: After checking, Deja and mailing list archives, upgrade to Active

icon title bar

Hello there, Is it possible to replace the Tk icon with my own so that mine shows up in the title bar? Thanks Regards carlo ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Re: comparing a read number to a number in a for loop

$Bill Luebkert wrote: Niklas Strömbeck wrote: I'm really fresh in programming. I'm reading a number from a file using a for-loop. Everything works except that I can't compare the value of the loop ($chh) with the read value ($hh) in the following if-loop. chomp the read number to

Re: comparing a read number to a number in a for loop

Philip Newton wrote: $Bill Luebkert wrote: Niklas Strmbeck wrote: I'm really fresh in programming. I'm reading a number from a file using a for-loop. Everything works except that I can't compare the value of the loop ($chh) with the read value ($hh) in the following if-loop.

RE: icon title bar

-Original Message- From: Carlo [mailto:[EMAIL PROTECTED]] Sent: 06 February 2001 10:42 To: [EMAIL PROTECTED] Subject: icon title bar Is it possible to replace the Tk icon with my own so that mine shows up in the title bar? Use the MainWindow-Icon() method thus... (code follows

RE: icon title bar

NB: the lack of transparency is a known issue - what I usually do is choose an appropriate non-transparent icon. Michael Erskine (MSEmtd) mailto:[EMAIL PROTECTED] JAPH ___ Perl-Win32-Users mailing list [EMAIL PROTECTED]

RE: Printing Files via Microsoft Word

# # This script will scan for MS Word files, through a specified path, # and print them to the default printer. # # This code should be modified to keep the OLE server alive (as opposed # to killing it every time it is needed). Doing so will make this script # run much faster. # use

next unless again

Oops. I forgot about the input file. Sorry. Greg edasnpb1.udf

Re: next unless

while (ASN) { if (/^FILEHEADER/) { #ignore } elsif (/^DOC HEADER(\d+)/) { s/(DOC HEADER)(3 )/:ASNLNT: /; print; } elsif (/^HEADER/) { chomp; @fields = split(/~/, $_,); print join('~', @fields, "\n"); while (DATA) { chomp; my @fields = split /~/;

RE: next unless

I'm not sure what I'm missing here, but how would $_ match /^EDI_ASN_D/ and /^EDI_CONT_D/ in the same block where no reassignment of $_ occurs. From: Greg Wardawy [mailto:[EMAIL PROTECTED]] } elsif (/^EDI_CONT_D/) { chomp; @fields = split(/~/, $_,); $upc = $fields[7]; print

Re: next unless

while (DATA) { Of course you'll have to change this... ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

Re: next unless

"Ron Grabowski" [EMAIL PROTECTED] 02/06/01 12:58PM while (ASN) { if (/^FILEHEADER/) { #ignore } elsif (/^DOC HEADER(\d+)/) { s/(DOC HEADER)(3 )/:ASNLNT: /; print; } elsif (/^HEADER/) { chomp; @fields = split(/~/, $_,); print join('~',

RE: Printing Files via Microsoft Word

Jan, Carl's script works fine, but I notice that he is using a "sleep 5" after the PrintOut command. Should this be necessary? (Or as you wrote: "that shouldn't be necessary if the app is correctly written". Does this mean that Word was not entirely correctly written? ;-) While I am

RE: next unless

"Newell, Paul" [EMAIL PROTECTED] 02/06/01 01:25PM I'm not sure what I'm missing here, but how would $_ match /^EDI_ASN_D/ and /^EDI_CONT_D/ in the same block where no reassignment of $_ occurs. From: Greg Wardawy [mailto:[EMAIL PROTECTED]] } elsif (/^EDI_CONT_D/) { chomp;

Re: Trouble with lookbehind in regular expression using File::Find

Thanks. That worked great. Next time I will post the entire code, sorry about that. I have a question about: return if $file !~ /\.html?$/i; I do not understand the use of ?$. I thought ? means one or more times and $ means end of line. I understand the end of line, but not the ?. Obviously