Re: [OT] Digitally signed posts
On 30 Jul 03, Sam Schinke ([EMAIL PROTECTED]) wrote: Hello Sisyphus, Tuesday, July 29, 2003, 8:36:41 PM, you wrote: S An excerpt received off-list (my thanks to that person) which I'd like to S post to the list: It seems that the problem arises from the mail client used by the sender. Take a look at the header of the message from Stephen Patterson. IMHO, OE does EXACTLY what the header says OE does treat the MIME type correctly. It is a standard MIME type. Yup, I'm signing all my messages the standard way, and seeing as pegasus, mutt and mozilla (and probably more) programs interpret them correctly, we can see that MS is off doing their usual thing. Just to give a little perspective on things, I started signing messages after I noticed my mailserver was getting a lot of rejections due to people sending spam with headers forged to appear as though they came from (non-existing) accounts on my server. The signature on my messages verifies that the message came from me and that it has not been altered, just in case people started picking my username to put in forged headers. -- Stephen Patterson http://www.lexx.uklinux.net http://patter.mine.nu [EMAIL PROTECTED] remove SPAM to reply Linux Counter No: 142831 GPG Public key: 252B8B37 Last one down the pub's an MCSE pgp0.pgp Description: PGP signature
Re: shutdown under windows 2000
Vincent wrote: How can I enable/disable the Force A Shutdown From A Remote System option in win2000 Vincent Hi, you can change this setting using the User Manager-Policies-User Rights-Force a Shutdown from A remote system Option Cheers Lucas ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: [OT] Digitally signed posts
- Original Message - From: Stephen Patterson [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Friday, August 01, 2003 6:12 AM Subject: Re: [OT] Digitally signed posts Yep, I've read the attachment you posted to me :-) Courtesy of the feedback I've had (and my thanks to all respondents), I can see that it's *my* problem, and not the consequence of some improper behavior on the part of Stephen or the software he's using. One observation - Stephen, it's a pity (from my point of view) that you're not using GnuPG, which displays fine. And one request - if you can configure things in such a way that I receive an unsigned transcript in the body of the email, in addition to the signed atachment, that would be nice and fine. I'm not sure that this can be achieved strikes me as being unlikely. It would probably mean that everyone else would be seeing double, wouldn't it ? Cheers, Rob ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: [OT] Digitally signed posts
Sisyphus wrote: - Original Message - From: Stephen Patterson [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Friday, August 01, 2003 6:12 AM Subject: Re: [OT] Digitally signed posts Yep, I've read the attachment you posted to me :-) Courtesy of the feedback I've had (and my thanks to all respondents), I can see that it's *my* problem, and not the consequence of some improper behavior on the part of Stephen or the software he's using. One observation - Stephen, it's a pity (from my point of view) that you're not using GnuPG, which displays fine. And one request - if you can configure things in such a way that I receive an unsigned transcript in the body of the email, in addition to the signed atachment, that would be nice and fine. I'm not sure that this can be achieved strikes me as being unlikely. It would probably mean that everyone else would be seeing double, wouldn't it ? Like we really need digital signatures in this forum - just say no to digital signatures. :) -- ,-/- __ _ _ $Bill LuebkertMailto:[EMAIL PROTECTED] (_/ / )// // DBE CollectiblesMailto:[EMAIL PROTECTED] / ) /-- o // // Castle of Medieval Myth Magic http://www.todbe.com/ -/-' /___/__/_/_http://dbecoll.tripod.com/ (Free site for Perl/Lakers) ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Number format
Title: RE: Number format Not sure if or how you can make it work with 5.x, but might be able to help with the rounding itself? What are you trying to round? Can you give an example of a number before and after? -Original Message- From: Krishna, Hari [mailto:[EMAIL PROTECTED]] Sent: Thursday, July 31, 2003 12:33 PM To: [EMAIL PROTECTED] Subject: Number format I am trying to install the number-format package which I downloaded from activestate and I get error Error installing package 'Number-Format.ppd': Read of ./ failed I donot see this packeage in the 5.xx zip files, so I downloaded from 6.x version. I do have 5.x version on my PC. How can I make this package work with my version 5.x(without me upgrading to any higher version)?? Basically I was looking for the round() function. Thanks for any help. Regards, Hari. CONFIDENTIALITY NOTICE: This e-mail message, including all attachments, is for the sole use of the intended recipient(s) and may contain confidential and privileged information. You may NOT use, disclose, copy or disseminate this information. If you are not the intended recipient, please contact the sender by reply e-mail immediately. Please destroy all copies of the original message and all attachments. Your cooperation is greatly appreciated. Columbus Regional Hospital 2400 East 17th Street Columbus, Indiana 47201 ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
NET:SMTP Subject Method
Hi everyone. First thanks for everyones help with the problems I was having with getting net:stmp to install. The person who suggested I install bundle-libnet (or maybe it was libnet-bundle) hit the nail on the head. This installed the net:smtp module. I have a script that looks like this: #Send E-mail for Critical Alerts #Here we define our parameters $to = '[EMAIL PROTECTED]'; $from = Openview; $body = Critical Alert; #Here we use the module $ pass parameters use Net::SMTP; $smtp = Net::SMTP-new('10.11.1.134'); $smtp-mail($ENV{USER}); $smtp-to($to); $smtp-data(); $smtp-datasend(From: $from\n); $smtp-datasend(To: $to\n); $smtp-datasend(\n); $smtp-datasend($body); $smtp-dataend(); $smtp-quit; I copied most of it from the documentation but the documentation doesnt seem to specify how to create a subject field. Does anyone know how to do this? The link to the module page is right here. http://search.cpan.org/author/GBARR/libnet-1.16/Net/SMTP.pm Thx again, Leon __ Do you Yahoo!? Yahoo! SiteBuilder - Free, easy-to-use web site design software http://sitebuilder.yahoo.com ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: CPU Utilization allways on 100% when executing perl scripts
Whatever the script is doing, make sure you are using blocking calls for your IO(thus the script will pause) or putting a 'sleep' in there somewhere. -Original Message- From: Markus Dubois [mailto:[EMAIL PROTECTED] Sent: Thursday, July 31, 2003 8:07 PM To: [EMAIL PROTECTED] Subject: CPU Utilization allways on 100% when executing perl scripts Hi, on W2K Server and W2K Professional on 300/1000/2600 Mhz machines i get allways 100 % CPU whenever i execute perl scripts. The scripts are standard MRTG scripts and modified perl scripts running with MRTG. What can i do about it? Is it poosible to drop the utilization generally? Regards Markus ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: CPU Utilization allways on 100% when executing perl scripts
- Original Message - From: Johan Lindstrom [EMAIL PROTECTED] If it interferes with other programs, you can lower the process priority in the TaskManager. But it's probably more convenient to do this when you start the program. Use the START command (START /? gives help) to do this. The effect is similar to the Unix nice command. I think that's the approach to take. I've got a perl script running with lowest priority (created that way using Win32::Process). It seems to have no effect at all on the level of cpu utilization (which always shows 100%). But it *does* mean that this hogging of the cpu is of no consequence. Whenever my box has to perform other functions the perl process simply makes way for it. If you have to make sure that cpu utilization never exceeds, say 80%, then I don't know how this could be achieved. Cheers, Rob ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Win32::ODBC Question
I have to move a ton of ODBC Connections from one box to another and was wondering if in this module there is a way to get all the attributes for a particular ODBC Connection so that I can turn around and insert it onto the other. I have Dave Roth's Standard Extensions book, but can't find anything that pulls all this info out, just how to put it in. Stanley G. Martin System Administrator Sprint - EIS3 Customer Care [EMAIL PROTECTED] ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Number format
- Original Message - From: Krishna, Hari [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Friday, August 01, 2003 2:33 AM Subject: Number format I am trying to install the number-format package which I downloaded from activestate and I get error Error installing package 'Number-Format.ppd': Read of ./ failed I donot see this packeage in the 5.xx zip files, so I downloaded from 6.x version. I do have 5.x version on my PC. How can I make this package work with my version 5.x(without me upgrading to any higher version)?? Basically I was looking for the round() function. Download the source from: http://search.cpan.org/author/WRW/Number-Format-1.45/ Copy 'Format.pm' from the tarball to your 'perl\site\lib\Number\' folder. (If the 'Number' folder doesn't exist, then create it :-) This module is pure perl so that's all that necessary. After installing'Format.pm', you can test by running the '.t' files that are in the tarball, if you like: perl format_price.t etc. Cheers, Rob ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Win32::ODBC Question
Title: RE: Win32::ODBC Question I think the best way to do this would be to hit the registry and look at ODBC.ini -Original Message- From: Martin, Stanley G [GMG] [mailto:[EMAIL PROTECTED]] Sent: Friday, August 01, 2003 10:50 AM To: perl-win32-users (perl-win32-users) Subject: Win32::ODBC Question I have to move a ton of ODBC Connections from one box to another and was wondering if in this module there is a way to get all the attributes for a particular ODBC Connection so that I can turn around and insert it onto the other. I have Dave Roth's Standard Extensions book, but can't find anything that pulls all this info out, just how to put it in. Stanley G. Martin System Administrator Sprint - EIS3 Customer Care [EMAIL PROTECTED] ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
AW: CPU Utilization allways on 100% when executing perl scripts
I've already tried out the start command but i have a cmd file with several perl scripts Running one by one. So whenever I try the start command I ran into problems. The perl.exe et forked endless so at the end I have a box locked with a lot of perl.exe running. Perhaps I make a mistake. Any help is greatly appreciated Regards Markus ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: NET:SMTP Subject Method
If your just looking for basic e-mail subject then add the folowing line after the datasend(To line: $smtp-datasend(Subject: $subject\n); Oops - and of course don't forget to define $subject somewhere before this. my $subject = Perl rules!; If your looking for more control look at some of the other mail modules to use with Net::SMTP like Mail::Sender, Mail::Mailer, MIME::Lite, and MIME::Entity (part of MIME-Tools bundle). Hope this helps. Trevor Joerges SendMIME Software www.sendmime.com - Original Message - From: Leon [EMAIL PROTECTED] To: win32 [EMAIL PROTECTED] Cc: Yahoo Beginner Perl [EMAIL PROTECTED] Sent: Friday, August 01, 2003 9:45 AM Subject: NET:SMTP Subject Method Hi everyone. First thanks for everyones help with the problems I was having with getting net:stmp to install. The person who suggested I install bundle-libnet (or maybe it was libnet-bundle) hit the nail on the head. This installed the net:smtp module. I have a script that looks like this: #Send E-mail for Critical Alerts #Here we define our parameters $to = '[EMAIL PROTECTED]'; $from = Openview; $body = Critical Alert; #Here we use the module $ pass parameters use Net::SMTP; $smtp = Net::SMTP-new('10.11.1.134'); $smtp-mail($ENV{USER}); $smtp-to($to); $smtp-data(); $smtp-datasend(From: $from\n); $smtp-datasend(To: $to\n); $smtp-datasend(\n); $smtp-datasend($body); $smtp-dataend(); $smtp-quit; I copied most of it from the documentation but the documentation doesnt seem to specify how to create a subject field. Does anyone know how to do this? The link to the module page is right here. http://search.cpan.org/author/GBARR/libnet-1.16/Net/SMTP.pm Thx again, Leon __ Do you Yahoo!? Yahoo! SiteBuilder - Free, easy-to-use web site design software http://sitebuilder.yahoo.com ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
cgi hangs when there's a problem with my script.
Hi, This may be a stupid question, but my excuse is that I am still on the low end of the perl learning curve. My question: Is there any way to speed up the response the interpreter gives when there is an error in my script? Sometimes it takes upwords of thirty seconds for the response page to be returned by cgi::carp. I am running everything on my laptop (while not connected to the internet - localhost) using win 98, apache, mysql. Sometimes there is a long wait when executing new (or just edited) perl scripts, especially when they are making calls to the database. But when I hit the refresh button, they execute quickly (less than a second). Any suggestions for tracking down the source of the delays would be helpful. Also, is there a searchable archive of this list? Thanks, Roland Get advanced SPAM filtering on Webmail or POP Mail ... Get Lycos Mail! http://login.mail.lycos.com/r/referral?aid=27005 ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: shutdown under windows 2000
Hi! Everyone, can you try the programm from Microsoft? %SystemRoot%/sistem32/restart.exe --- Best regards AlexBel Get advanced SPAM filtering on Webmail or POP Mail ... Get Lycos Mail! http://login.mail.lycos.com/r/referral?aid=27005 ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Help with regex
I'm doing some work with mail headers that involves converting timestamps to a standard format. The following regex works except for one pesky trailing close parens. Here's a sample of the data that causes problems: ==sample data Date: Fri, 1 Aug 1997 08:10:16 -0700 (PDT)br === This is converted to a MMDD.hhmmss format in place, then the result is fed to this regex: ==code extract # handle MMDD.hhmmss +0530 (IST) and similar while (/\b ( # $1 to $old (\d{8}\.\d{6}) # $2 to datestamp \s+ ([-+]?\d\d\d\d)# $3 to $timezone ( \s+ [(]? # $4 if there is an abbrev, [A-Z]{2,5}# like EST or (EST) [)]? )? # then just get rid of it ) \b/x ) { my ($old, $d1, $z1, ) = ($1, $2, $3, ); if (exists $timeZones{$z1}) { my $z2 = $timeZones{$z1}; # obtain the abbreviation $z1 = $timeZones{$z2}; # then the numeric value for the abbrev my $d2 = date2Epoch($d1) + 3600 * ($tz - $z1); s/\Q$old\E/'_' . epoch2Date($d2) . ' ' . $tzabbrev/e; } else { s/\Q$old\E/_$old/; # just mark it unchanged } } s/_(\d{8}\.\d{6})/$1/g;# clean up markers return $_; The output I'm getting is ==converted sample Date: 19970801.071016 PST)br The continued existence of that closing parens is the problem. It is not being included in $1, which becomes $old. How can I force its inclusion (and why is the regex not behaving greedily?) -- Will Woodhull [EMAIL PROTECTED] ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Help with regex
What are you trying to get the Epoch time from a date? If so you could also use the Date::Calc modules Date_to_Time function. Hope this helps. Trevor Joerges SendMIME Software www.sendmime.com - Original Message - From: Will of Thornhenge [EMAIL PROTECTED] To: perl-win32-users Mailing List [EMAIL PROTECTED] Sent: Friday, August 01, 2003 8:54 PM Subject: Help with regex I'm doing some work with mail headers that involves converting timestamps to a standard format. The following regex works except for one pesky trailing close parens. Here's a sample of the data that causes problems: ==sample data Date: Fri, 1 Aug 1997 08:10:16 -0700 (PDT)br === This is converted to a MMDD.hhmmss format in place, then the result is fed to this regex: ==code extract # handle MMDD.hhmmss +0530 (IST) and similar while (/\b ( # $1 to $old (\d{8}\.\d{6}) # $2 to datestamp \s+ ([-+]?\d\d\d\d)# $3 to $timezone ( \s+ [(]? # $4 if there is an abbrev, [A-Z]{2,5}# like EST or (EST) [)]? )? # then just get rid of it ) \b/x ) { my ($old, $d1, $z1, ) = ($1, $2, $3, ); if (exists $timeZones{$z1}) { my $z2 = $timeZones{$z1}; # obtain the abbreviation $z1 = $timeZones{$z2}; # then the numeric value for the abbrev my $d2 = date2Epoch($d1) + 3600 * ($tz - $z1); s/\Q$old\E/'_' . epoch2Date($d2) . ' ' . $tzabbrev/e; } else { s/\Q$old\E/_$old/; # just mark it unchanged } } s/_(\d{8}\.\d{6})/$1/g;# clean up markers return $_; The output I'm getting is ==converted sample Date: 19970801.071016 PST)br The continued existence of that closing parens is the problem. It is not being included in $1, which becomes $old. How can I force its inclusion (and why is the regex not behaving greedily?) -- Will Woodhull [EMAIL PROTECTED] ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Help with regex
Will of Thornhenge wrote: I'm doing some work with mail headers that involves converting timestamps to a standard format. The following regex works except for one pesky trailing close parens. Here's a sample of the data that causes problems: ==sample data Date: Fri, 1 Aug 1997 08:10:16 -0700 (PDT)br === This is converted to a MMDD.hhmmss format in place, then the result is fed to this regex: ==code extract # handle MMDD.hhmmss +0530 (IST) and similar while (/\b ( # $1 to $old (\d{8}\.\d{6}) # $2 to datestamp \s+ ([-+]?\d\d\d\d)# $3 to $timezone ( \s+ [(]? # $4 if there is an abbrev, [A-Z]{2,5}# like EST or (EST) [)]? )? # then just get rid of it ) \b/x ) { Drop the closing \b (I changed $4 [optional]): /\b ( # $1 to $old (\d{8}\.\d{6}) # $2 to datestamp \s+ ([-+]?\d{4}) # $3 to $timezone (\s+\([A-Z]{2,5}\))? # $4 if an abbrev, like EST or (EST) ) # then just get rid of it /x) { my ($old, $d1, $z1, ) = ($1, $2, $3, ); if (exists $timeZones{$z1}) { my $z2 = $timeZones{$z1}; # obtain the abbreviation $z1 = $timeZones{$z2}; # then the numeric value for the abbrev my $d2 = date2Epoch($d1) + 3600 * ($tz - $z1); s/\Q$old\E/'_' . epoch2Date($d2) . ' ' . $tzabbrev/e; } else { s/\Q$old\E/_$old/; # just mark it unchanged } } s/_(\d{8}\.\d{6})/$1/g;# clean up markers return $_; The output I'm getting is ==converted sample Date: 19970801.071016 PST)br The continued existence of that closing parens is the problem. It is not being included in $1, which becomes $old. How can I force its inclusion (and why is the regex not behaving greedily?) -- ,-/- __ _ _ $Bill LuebkertMailto:[EMAIL PROTECTED] (_/ / )// // DBE CollectiblesMailto:[EMAIL PROTECTED] / ) /-- o // // Castle of Medieval Myth Magic http://www.todbe.com/ -/-' /___/__/_/_http://dbecoll.tripod.com/ (Free site for Perl/Lakers) ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs