Hi All:
Got a small problem I can't figure out here. All I want to do is log
into the SSH server, grabe the banner test and exit. The banner text
contains some HW status I'm trying to capture.
Script is below:
use strict;
use warnings;
use Net::SSH::W32Perl;
my $host = '220.255.171.11';
my
I'm running 5.8.8-817 and it appears to be included in this one.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of David Ressler
Sent: Thursday, June 01, 2006 9:28 AM
To: Perl List
Subject: Win32::SerialPort problem
I'm trying to use
You're only option is to spawn threads and detach them. Have them write
their results to a shared hash or something and define your own
timeout...if you don't see the result from that thread ID in X seconds,
declare it timed out and forget about it. When it actually does timeout
is will error and
REGEX!
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Ng, Bill
Sent: Tuesday, May 02, 2006 3:55 AM
To: perl-win32-users@listserv.ActiveState.com
Subject: Easy One
Real simple,
I have a string, $a for arguments sake, that contains
Win sockets on Win32?
not really, the only choice you have is IO::Select.
:)
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
Lyle Kopnicky
Sent: Tuesday, April 18, 2006 12:22 AM
To: Perl-Win32-Users@listserv.ActiveState.com
Subject: Non-blocking IO?
Hi All:
The attached script is a performance test model I use for a production
script I have that uses sockets to connect to various targets once per
minute. It used to leak 2 handles per thread per run but that has been
fixed with perl 5.8.8-817. Now that the handles leak is fixed I have
been
You can't.
IO::Select with pipes and file handles is only supported on Unix.
IO::Select on Win32 only works with Sockets.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Thursday, April 06, 2006 2:10 PM
To:
You need to be counting actual HW clock ticks. Win32::GetTickCount()
will return the HW timer count...believe its incremented every
millisecond. SW timers won't work.
Also, you can't use sleep for anything other than integer seconds. If
you want to sleep for periods smaller than a second, you
Hello Jan and Fellow Users:
The Win32 threads leaking handles bug is fixed! Yippie!
OUTSTANDING! Well done development team.
Have tested it on my leaking handles script and my production code,
looks good. The number of handles open jumps when the threads are
launched and as the detached threads
Where at Suntec?
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Foo Ji-Haw
Sent: Monday, March 27, 2006 10:01 AM
To: perl-win32-users@listserv.ActiveState.com
Subject: Perl book sale at Suntec City (Singapore)
Ok, I know this is relevant to
Hi Veli:
There are several way to do what you want. What not use threads?
You could use IO::Select as well but that only works for sockets on Win32
unfortunately, in Linux it works with console handles as well.
Threads is the most straight forward but I've had problems with threads
crashing
Hi All:
After installing perl 5.8.8-816 I ran my handles leak program to see if
perl is still leaking handles when using shared arrays and hashes with
threads. Problem is, I don't have an answer on whether it still leaks
handles because the interpreter crashes in the midst of lunching the
From the Active per docs:
Devel::DProf - a Perl code profiler
* NAME
* SYNOPSIS
* DESCRIPTION
* PROFILE FORMAT
* AUTOLOAD
* ENVIRONMENT
* BUGS
* SEE ALSO
NAME
Devel::DProf - a Perl code profiler
SYNOPSIS
perl -d:DProf test.pl
DESCRIPTION
The
Has the handles leak on Win32 when using shared variables with threads
been fixed?
:)
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Jan Dubois
Sent: Tuesday, March 14, 2006 7:42 AM
To: activeperl@listserv.ActiveState.com;
You could just use netsh.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Paul Sobey
Sent: Monday, February 28, 2005 7:18 PM
To: Perl-Win32-Admin
Cc: Perl-Win32-Users
Subject: RE: Change network interface parameters via Perl
Assuming you
Yup.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Chris
Sent: Wednesday, March 08, 2006 6:55 AM
To: 'Chris Wagner'; perl-win32-users@listserv.ActiveState.com
Subject: RE: old messages?
Did anyone else also just receive a boat load of old
Use this as a hack template till you get your head around it:
#!perl
# Simple Perl Script to illustrate use of WMI to gather system
information
# and display it in the same format at the Windows Management Console
use Win32::OLE qw(in with);
use Win32::Registry;
# Pick a host that you have the
Use the appropriate WMI classes with the Win32::OLE module.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of andrew Black
Sent: Sunday, March 05, 2006 2:10 AM
To: perl-win32-users
Subject: Battery info on a laptop
Hi
Does anyone know if it
Hi All:
Is there a way for a thread to have its own console separate from the
calling process?
Cheers,
john
___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Win32::Serialport
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Rajesh Vattem
Sent: Saturday, January 07, 2006 2:54 PM
To: Perl-Win32-Users@listserv.ActiveState.com
Subject: Info on reading COM ports
Hi,
I am looking for ways to read a
Hi Steven:
Ok cool, I got it going with this:
use Win32::OLE qw (in);
use strict;
use warnings;
my $IIS = Win32::OLE-GetObject(IIS://johnathlonxpm);
my $PathList = $IIS-GetDataPaths(AuthAnonymous,0);
print($PathList);
print(\n);
my $thislong = scalar(@$PathList);
print(This long is
Hi All:
How can I find this stuff with Perl?
I need to dump the SMTP and ftp settings, what MS calls properties, from
a machine for a report but the setup is done using IIS with GUIs.
Anyone know how to do this? Where to get the information from?
I've scoured the registry and can't find where
You'll have to install the resource kit.
You canget the tools at www.microsoft.com
-Original Message-
From: Octavian Rasnita [mailto:[EMAIL PROTECTED]
Sent: Tuesday, December 20, 2005 4:11 PM
To: John Serink; Ted Zeng; perl-win32-users@listserv.ActiveState.com
Subject: Re: How
19, 2005 4:42 PM
To: John Serink
Cc: perl-win32-users@listserv.ActiveState.com
Subject: Re: how to detect a disconnected socket?
John Serink wrote:
Ok, if you're using sockets I strongly recommend you ALWAYS using
sysread and syswrite as they baypass standard IO buffereing.
Be careful
C:\shutdown /?
Usage: shutdown [-i | -l | -s | -r | -a] [-f] [-m \\computername] [-t
xx] [-c comment] [
-d up:xx:yy]
No args Display this message (same as -?)
-i Display GUI interface, must be the first
option
-l
Ok, if you're using sockets I strongly recommend you ALWAYS using
sysread and syswrite as they baypass standard IO buffereing.
Be careful with sysread, it cand and will return partial reads, you MUST
be prepared for that.
Unless you want your program to block on sysread, you should use
First:
use \ not /.
Second:
You have to escape the \ with a second \ when using double quotes.
Your line needs to read:
$sys=C:\\antiword\\antiword.exe -t -w 1 document.doc
C:\\Inetpub\\wwwroot\\somedir\\document.txt;
That shou'd work.
Alternatively, you could do it this way:
Use sysread. You might want to use the IO:Select module to check if the
call will block before calling...
gives you a bit more control.
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Foo Ji-Haw
Sent: Tuesday, December 06, 2005 12:30
#! perl
# ==
# $Author: Jmk $
# $Date: 19.05.98 7:12 $
# $Archive: /Jmk/scripts/saa/process.pl $
# $Revision: 2 $
# ==
# shows the task list like the
perfmon or taskmanager.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Sandhu, Suchindra
Sent: Saturday, November 26, 2005 12:04 AM
To: perl-win32-users@listserv.ActiveState.com
Subject: Detecting memory leaks in perl scripts
Greetings,
Title: Message
net::SMTP
-Original Message-From:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Maxmelbin Neson (RBIN/EDM3)Sent: Friday, November 18, 2005 2:57
PMTo: [EMAIL PROTECTED];
perl-win32-users@listserv.ActiveState.comSubject: How to send mail
Anyone know if the leaking handles on win32 when using shared arrays
with threads is fixed?
It wasn't mentioned in the change log.
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Jan Dubois
Sent: Wednesday, November 16, 2005 4:21 AM
Doesn't seem to be, just checked
She's still leaving 2 handles open per thread after the thread has
ended.
Any idea when/if this will get fixed?
Cheers,
John
-Original Message-
From: Jan Dubois [mailto:[EMAIL PROTECTED]
Sent: Wednesday, November 16, 2005 9:30 AM
To: John Serink
Hi Ross:
You must use sysread with IO select. Do NOT use this as its buffered
IO.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Ross Draper
Sent: Tuesday, November 08, 2005 4:33 AM
To: perl-win32-users@listserv.ActiveState.com
It depends on how you are connected to the internet.
if its dialup, you could do this:
my @bob = `ipconfig/all`;
my $jim=;
foreach $jim @bob {
if($jim=~m/ppp/i){
last;
}
}
if its not dialup, you can do something similar looking for the field
IP Address and checking if the stuff after the
Title: Message
You'll have to hack Winsock.
You could hack the stack in Linux but Gates doesn't give his source code
out so.
:)
John
-Original Message-From:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
MarkusSent: Wednesday, October 12, 2005 3:40
Hi All:
Ok, I need to use either Win32::Console or Term::ANSIScreen depending
whether I'm on a Linux platform or Windoze box, so I do this:
if($^O eq MSWin32){
# Check which OS
print(Looks like its $^O\n);
require Win32::Console;
} else {
require Term::ANSIScreen;
}
Works
at
eval1.pl line 22.
Execution of eval1.pl aborted due to compilation errors.
Same problem. See what I mean?
Any thoughts?
-Original Message-
From: $Bill Luebkert [mailto:[EMAIL PROTECTED]
Sent: Thursday, October 06, 2005 6:42 PM
To: John Serink
Cc: perl-win32-users
really like have the 'no strict' in there but it's a work around
unless we can come up with something more elegant.
Cheers,
John
-Original Message-
From: John Serink
Sent: Thursday, October 06, 2005 10:13 PM
To: '$Bill Luebkert'
Cc: perl-win32-users@listserv.ActiveState.com
Subject: RE
Check the IO::Select docs...
they work only for socket on Win32, you can't use them from file handles
including STDIN unfortunately.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Su, Yu (Eugene)
Sent: Friday, October 07, 2005 3:08
Anybody know how to do this?
I want to use Term::ANSIColor on a windoze box, but when I run this:
use strict;
use warnings;
use Term::ANSIColor;
print( color 'bold blue');
print( This text is bold blue.\n);
print( color 'reset');
print(This text is normal.\n);
print(colored (Yellow on
Actually, that was the problem.
Cheers,
John
-Original Message-
From: Reinhard Pagitsch [mailto:[EMAIL PROTECTED]
Sent: Thursday, September 22, 2005 4:59 PM
To: John Serink
Cc: perl-win32-users@listserv.ActiveState.com
Subject: Re: Adding values to hashes
Hello John,
Do you
Title: Message
my @jim=`tasklist`;
now parse jim and find with you're looking for.
ALternatively:
my @jim=`tasklist|find "whatyou'relookingfor"`;
Jim will likely contain only one entry now, the thing you're looking
for.
:)
John
-Original Message-From:
[EMAIL PROTECTED]
Title: Message
You need to use the IO:Select module which makes the ports
non-blocking.
When you check the port for reading, it will indicate there is something
to read. When you read it using sysread if it returns:
0 = the socket has disconnected.
undef = there was an error on the handle, $!
Make sure you set the reuse to 1.
You could also try $return_val=$sock-shutdown(AF_INET);
rather than close($sock);
Cheers,
John
-Original Message-
From: Peter Eisengrein [mailto:[EMAIL PROTECTED]
Sent: Thursday, September 01, 2005 10:35 AM
To: John Serink; Peter Eisengrein; 'Perl
Just detach them and forget about them.
other than that, I don't think there's a way to terminate them.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of ajpeck
Sent: Thursday, August 25, 2005 3:02 PM
To: Perl Win32 mail list
Subject: [threads]
] Forced termination
The problem is that I need to reclaim the memory resource of
the thread
that is not needed no more, so I can start off a new thread.
Thus detach
is not suitable in this case.
Alun
John Serink wrote:
Just detach them and forget about them.
other than that, I
You sure this works under windows?
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Tom Pollard
Sent: Friday, August 26, 2005 2:17 AM
To: ajpeck
Cc: Perl Win32 mail list
Subject: Re: [threads] Forced termination
On Thu, 25 Aug 2005, ajpeck
Why don't you pass the parameters as references.
They work like pointers in C kindof.
Why do you want to reference your subroutine?
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Tuesday, July 26, 2005 2:19 AM
To:
Yup.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Tuesday, July 26, 2005 6:10 AM
To: Siebe Tolsma
Cc: perl-win32-users@listserv.ActiveState.com
Subject: references of sub and params in a threads::shared variable
and it will
crash.
The leaking handles is a known bug when using threads on Win32.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 26, 2005 11:20 AM
To: perl-win32-users@listserv.ActiveState.com
Cc: John Serink
Subject: RE: references
Comparing floating points means to ask whether one number falls within a
RANGE of values.
You have to say it like this:
use strict;
use warnings;
my $bob = 630.239;
my $test = 630.24;
my $range1 = 0.001;
my $range2 = 0.1;
no warnings;
if( ($test = ($bob+$range1) ) ($test = ($bob - $range1)
Hello Angus:
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Angus McIntyre
Sent: Wednesday, July 13, 2005 6:48 AM
To: perl-win32-users@listserv.ActiveState.com
Subject: fork() and ithreads in AS Perl 5.8.6
I'm writing a Perl program to run
Or, you could simply open the port 25 to the SMTP server and send the
SMTP commands yourself...
Very easy, just read the SMTP RFC.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Chris Wagner
Sent: Saturday, July 09, 2005 12:32 PM
This works:
use strict;
use warnings;
use Net::SMTP;
my $mailhost = jim.bob.com;
my $mailobj = ;
if($mailobj = Net::SMTP-new($mailhost, Timeout=10, Debug=1)){
print(Connected to $mailhost\n);
} else {
print(Could not connect to $mailhost\n);
die;
}
my $username =
Hi All:
With regards to:
This is perl, v5.8.7 built for MSWin32-x86-multi-thread
(with 7 registered patches, see perl -V for more detail)
Copyright 1987-2005, Larry Wall
Binary build 813 [148120] provided by ActiveState
http://www.ActiveState.com
ActiveState is a division of Sophos.
Built Jun
Hi Paul:
If you'll notice, this is a Win32 group. That is perl, on a Win32
platform, not perl on a Win64 platform. If you want the latter, you'll
likely have to compile from source.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Paul
Correct.
-Original Message-
From: Thomas, Mark - BLS CTR [mailto:[EMAIL PROTECTED]
Sent: Thursday, June 02, 2005 8:35 PM
To: John Serink; Rajesh Vattem;
perl-win32-users@listserv.ActiveState.com
Subject: RE: Net::Telnet
John wrote:
its does not work on these servers
:[EMAIL PROTECTED]
Sent: Thursday, June 02, 2005 9:22 PM
To: Thomas, Mark - BLS CTR; John Serink; Rajesh Vattem;
perl-win32-users@listserv.ActiveState.com
Subject: RE: Net::Telnet
I have had no issues using Net::Telnet on XP Pro that are
using the MS Windows telnet server.
Stating
What kind of particular host are telnetting into?
The Net::Telnet module works connecting to the following telnet servers:
WindowsNT 4.0,
Cisco Routers,
Most of the Unix varients.
its does not work on these servers:
Windows 2000 Pro,
Windows XP pro,
Windows 2000 server pro,
Windows server 2003.
Title: Message
Why not use SNMP from your routers?
-Original Message-From:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Eric LogesonSent: Tuesday, May 24, 2005 11:28 PMTo:
perl-win32-users@listserv.ActiveState.comSubject: Measure
bandwidth
Hello List
I think I read that file events don't work with WIn32 Perl/Tk.
:)
JOhn
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Sisyphus
Sent: Friday, May 13, 2005 6:00 PM
To: Igor Litmanovich; perl-win32-users
Subject: Re: Tk::ExecuteCommand on perl5.8
Turn on autoflushing to STDIO.
Will fix it.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Paul Rogers
Sent: Sunday, April 24, 2005 6:04 AM
To: Perl-Win32-Users
Subject: perl56 to 58...delay on line prints
I just upgraded to
What does te output of perl -v say?
Here is mine:
C:\perl -v
This is perl, v5.8.6 built for MSWin32-x86-multi-thread
(with 3 registered patches, see perl -V for more detail)
Copyright 1987-2004, Larry Wall
Binary build 811 provided by ActiveState Corp. http://www.ActiveState.com
ActiveState is
: Marcos Legido [mailto:[EMAIL PROTECTED]
Sent: Thursday, April 07, 2005 4:17 AM
To: John Serink
Cc: perl-win32-users@listserv.ActiveState.com
Subject: Re: RE: Thread programming en Perl 5.8.4
Hi:
Ok, the output is:
This is perl, v5.8.4 built for MSWin32-x86-multi-thread
(with 3
Move to TieRegistry, Win32:;Registry is no longer supported.
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Jim Hansen
Sent: Tuesday, April 05, 2005 3:23 AM
To: Perl-Win32-Users@listserv.ActiveState.com
Subject: Win32:Registry
I don't think signals are suported on Win32 boxes.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of David Liouville
Sent: Thursday, March 31, 2005 12:00 AM
To: perl-win32-users@listserv.ActiveState.com
Subject: Socket + fork
between the 4 servers according to LAN segments.
Alun
John Serink [EMAIL PROTECTED] 03/30/05 5:24 PM
Hiyah:
Ok, the thing you'll NOT want to do is spawn the threads all
at once. I'd do them say, in groups of 25 or so which will
allow the ones that finish, out of the 25, to complete
Hiyah:
Ok, the thing you'll NOT want to do is spawn the threads all at once.
I'd do them say, in groups of 25 or so which will allow the ones that
finish, out of the 25, to complete and die thus freeing up memory for
your other 2975. SO, in pseudo code, do this:
spawn threads 0-24,
do stuff,
Why not just use the UNC file name?
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Wong, Danny H.
Sent: Friday, March 25, 2005 3:44 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: Mapping Drive
Importance: High
Hi All,
I
PPM, Proxies and Firewalls
If you use a proxy server or firewall, you might have trouble running
PPM. Here is the solution.
NOTE: If none of the changes in this document work for you, you may
download individual packages from here [ActivePerl 801 and later] or
here [ActivePerl 613 and later]
Title: Message
Use theWin32::ODBC module.
-Original Message-From:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Leigh SharpeSent: Wednesday, March 23, 2005 6:56
AMTo: perl-win32-users@listserv.ActiveState.comSubject:
Reading an Access Database
Hi All,
Th old WindowsNT telnet server works fine, the Win2K and XP servers do
not.
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Jim Guion
Sent: Friday, March 18, 2005 4:31 AM
To: perl-win32-users@listserv.ActiveState.com
Subject:
It doesn't cause any problem
But you 'may' want to wait till your threads are done
You can either detach or join to do so.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Sergey Cherniyenko
Sent: Friday, March 04, 2005 3:36 PM
Title: Message
net::telnet
-Original Message-From:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Maxmelbin Neson (RBIN/EDM3)Sent: Monday, February 28, 2005 4:47
PMTo: [EMAIL PROTECTED];
perl-win32-users@listserv.ActiveState.comSubject: How to call a
You could just use netsh.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Paul Sobey
Sent: Monday, February 28, 2005 7:18 PM
To: Perl-Win32-Admin
Cc: Perl-Win32-Users
Subject: RE: Change network interface parameters via Perl
Assuming you
Title: Message
Its not memory directly that's leaking, its handles which start to
consume memory.
Have a look at the open handles on your app...maybe use perfmon to
monitor is and see if its the number of open handles that's doing
it.
Cheers,
John
-Original Message-From:
to do a tiny
bit of rewriting to get a work around like that to go.
Cheers,
John
-Original Message-From: Paul Sobey
[mailto:[EMAIL PROTECTED] Sent: Monday, February 21, 2005 9:10
PMTo: John Serink; perl-win32-usersSubject: RE: Threads
+ Memory Leak??
Blimey, I stopped
Sc \\yourserver stop wins
Sc \\yourserver start wins
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Hon Shi
Sent: Sunday, February 20, 2005 10:42 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: WINS - reset
Anyone have
Hi!
Its known and in bugzilla(http://bugs.activestate.com), 35931. I too
thought it was going to be fixed in 5.8.6 but no luck.
From Jeff Griffiths regarding this issue:
For 5.8.6, we left the Win32::* stuff as-is, but I believe Jan wants to
look at fixing bugs for the next round.
Cheers,
John
Win32::TieRegistry
Read the docs, it installed with the default activestate distribution.
On Tue, 2005-02-01 at 19:07 +0800, honery wrote:
Hello ,
Could you please tell me how to use Perl to operate Windows's registry
table, such as search,add key,modify value etc...
And I would really
Go to www.sysinternals.com
They have a utility that can help you on Win2K.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Monday, January 10, 2005 11:40 AM
To: perl-win32-users@listserv.ActiveState.com
Cc: [EMAIL
(The SO_LINGER return value is $jim[0] and $jim[1]\n);
}
} else {
print(Return value fo SO_LINGER is undefined\n);
}
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of John Serink
Sent: Friday, January 07, 2005 2:09 PM
To: $Bill Luebkert
Hi All:
Anybody know how to properly unpack this:
my $linger = getsockopt($sock,SOL_SOCKET,SO_LINGER);
I've tried every option but I can't make sense of the response.
$linger is 4 bytes long according to length($linger) so it did return...
I just can't figure out how to unpack the response.
Have
is 1
The SO_LINGER firstbyte return value is 1
Which is correct.
Cheers,
John
-Original Message-
From: $Bill Luebkert [mailto:[EMAIL PROTECTED]
Sent: Thursday, January 06, 2005 6:22 PM
To: John Serink
Cc: perl-win32-users@listserv.ActiveState.com
Subject: Re: getsockopt
John
the appropriate
settings
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of $Bill Luebkert
Sent: Friday, January 07, 2005 1:57 PM
To: perl-win32-users@listserv.ActiveState.com
Subject: Re: getsockopt--Solution on Win32
John Serink wrote
Telnet server on Windows NT works fine with Net::Telnet, on Win2K No as
Win2K using ANSI formatting which I've not figured a way to turn off.
Also works fine against a Ciso router.
WinXP never tried.
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]
Use strict;
Use warnings;
my @jim=`bob.bat`;
print(@jim);
Will run bob.bat and capture all output to @jim. Note, those are back
ticks, above the tab key not single quotes.
:)
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of CHIDIPI, RAMJEE
Hi All:
Just installed the new perl build, thought it would fix the leaking
Win32 Handles with threads.
It didn't.
Perl is still leaking handles, 2 per thread when using shared hashes or
arrays.
Cheers,
John
John Edward Serink
Product Applications Engineer,
Infrastructure Systems
use strict;
use warnings;
use Net::SMTP;
my $mailhost = mail.bob.com;
my $mailobj = ;
if($mailobj = Net::SMTP-new($mailhost, Timeout=10, Debug=1)){
print(Connected to $mailhost\n);
} else {
print(Could not connect to $mailhost\n);
die;
}
my $username = [EMAIL PROTECTED];
Check the perl docs for pack and unpack.
Everything you need is there.
Cheers,
john
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Leroy G. Blimegger Jr.
Sent: Sunday, December 19, 2004 10:01 PM
To: [EMAIL PROTECTED]
Subject: Binary Data File
If you're on a Linux box, just compile from source at 64bits.
If you're on a Win32 box running XP 64, and you want 64bit perl, again,
compile from source.
Not sure how stable the Win32 Modules will be on 64 bits.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
@bob = `netstat -a -o`;
Use a regex to sift to the array bob to find the PID of interest.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Friday, December 10, 2004 8:58 AM
To: Perl-Win32
Cc: [EMAIL
Go to the registry and peel it out of there.
Win32::TieRegistry is what you're after.
Have fun,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Friday, December 10, 2004 9:32 AM
To: Perl-Win32
Cc: [EMAIL PROTECTED]
,
Jim
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of [EMAIL PROTECTED]
Sent: Thursday, December 09, 2004 9:33 PM
To: John Serink
Cc: [EMAIL PROTECTED]; Perl-Win32
Subject: RE: get a list of installed programs and path to exe.
hi all.
here
Just open a single client server on the ports you don't what anyone to
use
You'll have to do it in a separate thread however and that could start
to consume resources...else it will block waiting for an accept.
Or, you could create server using the IO::Select method and wait for
connects but
Win32::AdminMisc
See www.roth.net.
-Original Message-
From: [EMAIL PROTECTED] [mailto:perl-
[EMAIL PROTECTED] On Behalf Of Marie-eve URVOY
Sent: Wednesday, December 08, 2004 5:34 PM
To: Paul Sobey
Cc: Perl-Win32
Subject: RE: run a process as System account
I think I can't use
You don't need to use threads to do this.
The comm buffers are filled for you behind the scenes with
Win32::Serialport.
You can use threads if you want but there is no need.
Cheers,
John
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Behalf Of Lin Jingxian
Hi All:
Anyone know what the maximum number of threads a Win32 perl app can
spawn?
Cheers,
John
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Of $Bill Luebkert
Sent: Thursday, November 18, 2004 9:37 AM
To: [EMAIL PROTECTED]
Subject: Re: Max Number of threads?
John Serink wrote:
Hi All:
Anyone know what the maximum number of threads a Win32 perl app can
spawn?
Too easy - just write a loop and count them yourself
1 - 100 of 123 matches
Mail list logo