Re: pound sign trouble

2003-07-08 Thread csaba . raduly
On 08/07/2003 02:20:33 perl-win32-users-admin wrote: >Allegakoen, Justin Devanandan wrote: >> Peter, >> >> I was playing around with this earlier. Heres what I get:->> >> Microsoft Windows XP [Version 5.1.2600] >> (C) Copyright 1985-2001 Microsoft Corp. >> >> C:\Perl\Programs>perl -e "print ord(

Re: Embedding Perl (Mail::SpamAssassin) in a C program

2003-07-07 Thread csaba . raduly
On 07/07/2003 16:09:21 perl-win32-users-admin wrote: [snip] > >I am really hoping for the "fastest" solution and not necessarily the >easiest. >I'm wondering if I can do something like: > >eval_pv(use Mail::SpamAssassin); >eval_pv(my $spamobj = Mail::SpamAssassin->new()); >eval_pv(my $status = $s

Re: question

2003-06-17 Thread csaba . raduly
On 16/06/2003 20:54:52 Michael Higgins wrote: >FARRINGTON, RYAN wrote: >> I think I bugged Bill enough so I'll ask the list... >> >> This was provided by Bill: >> >> my @sortlist = map { $_->[0] } >>sort { mysort ($field, $type, $case, $dir) } >>

Re: API call crashes if I pass parameters.

2003-06-17 Thread csaba . raduly
On 16/06/2003 22:57:22 perl-win32-users-admin wrote: >I am having trouble with API, similar to these posts: >http://aspn.activestate.com/ASPN/Mail/Message/732561 >http://aspn.activestate.com/ASPN/Mail/Message/perl-win32-users/753232 >Like those posts, I had API working. When I tried the API scri

Re: How to convert OEM to ANSI?

2003-06-04 Thread csaba . raduly
On 04/06/2003 10:03:09 perl-win32-users-admin wrote: >Is there a function simply to convert an OEM string or file to an ANSI >string or file? > >I'm kinda new to Perl and one of my first programs reads rows from an >ASCII file that is OEM encoded and in order to load it via ADODB into my >MS-SQL

RE: Development environments ...

2003-04-03 Thread csaba . raduly
On 03/04/2003 00:09:27 Daniel Gross wrote: >Thank you for the incoming IDE suggestions ... > >Its interesting to see that some Perl developers seem not to "require" >an interactive debugging environment, but are happy with power-text >editors, and (I would imagine) with the command line debugger.

RE: reformatting perl compiler warning/errors

2003-04-01 Thread csaba . raduly
On 01/04/2003 11:39:36 "Stuart Arnold" wrote: >>On 01/04/2003 10:19:44 "Stuart Arnold" wrote: >Your date format looks funny. It looks like its Jan 4, 2003.  You may want to >check that out. > perldoc perllocale P.S. Please do NOT CC me, I'm on the list. -- Csaba Ráduly, Software Engineer, S

Re: CGI execution problem, was: (no subject)

2003-04-01 Thread csaba . raduly
On 01/04/2003 09:15:34 Glenn Linderman wrote: >On approximately 3/31/2003 1:58 PM, came the following characters from >the keyboard of BB: >> I have begun learning CGI from a book dated '96 which refers to UNIX as a >> platform. I am using Win32 and have a question about an example from the >> bo

RE: Sending a sequence of system commands?

2003-03-31 Thread csaba . raduly
On 27/03/2003 15:26:05 perl-win32-users-admin wrote: >> Hello world! >> >> Is there a way to execute a series of system commands? >> >> For example if you tried to do an FTP how could you pass it all the >> subsequent command lines? (I know you can do it using Net::FTP, but I'm >> trying to do so

Re: reformatting perl compiler warning/errors

2003-03-31 Thread csaba . raduly
On 29/03/2003 06:53:45 perl-win32-users-admin wrote: >On 3/27/2003 5:24 AM, Stuart Arnold wrote: >> I want to be able to somehow reformat the error/warn messages that perl >> dumps out so that I can format it (override it). [snip] > >perldoc perlvar > >"Certain internal hooks can be also set usin

Re: Win32::EventLog

2003-03-25 Thread csaba . raduly
On 25/03/2003 14:59:21 perl-win32-users-admin wrote: >I actually noticed the typo sometime after posting to this board, and >replaced it with: >new("Application", 'MDS-APL') >Unfortunately that did not work either! >Also, does anyone know if this module only allows me to write to the >applica

Re: Win32::EventLog

2003-03-25 Thread csaba . raduly
On 24/03/2003 22:24:37 perl-win32-users-admin wrote: >Hello all, > >I am having a terrible time trying to get the following script to write to a >remote EVENT LOG. What am I doing wrong? or am I going outside of the >boundaries the module is capable of? Whether local or remote it always writes >

Re: if your download doesn't start...

2003-03-22 Thread csaba . raduly
On 21/03/2003 16:33:55 perl-win32-users-admin wrote: >Hi, > >A lot of "download" websites wind up showing a page _and_ starting a >download, apparently concurrently. Is there a "standard" CGI way of >doing that? > >They usually include an alternative "if your download doesn't start >automaticall

RE: (no subject)

2003-03-20 Thread csaba . raduly
On 20/03/2003 12:12:27 JamesTillman wrote: >> -Original Message- >> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] >> Sent: Thursday, March 20, 2003 4:34 AM >> Cc: [EMAIL PROTECTED] >> Subject: RE: (no subject) >> >> >> >> >Try server\\new\$ >> > >> >> Don't. Try '\\server\new$' if

RE: puzzle: passing command line args to wperl

2003-03-12 Thread csaba . raduly
On 12/03/2003 14:44:30 perl-win32-users-admin wrote: >This must be the problem. I had associated a file extension of .wpl to >wperl and was executing "foo.wpl bar" but was seeing no arguments. > Open an Explorer window and go to View/Options (on NT4) or Options/File Types on Win2000 (these move

Re: puzzle: passing command line args to wperl

2003-03-12 Thread csaba . raduly
On 11/03/2003 23:23:46 perl-win32-users-admin wrote: [snip] > >However I have discovered that I cannot pass command line arguments to the >wperl script and this is very inconvenient. > [snip] > >wperl fails to see the command line if I use getopts() or if I just operate >directly against the ARGV

Re: environment variable issues

2003-03-12 Thread csaba . raduly
On 11/03/2003 19:35:11 perl-win32-users-admin wrote: >I am having problems retrieving some of the environment variables using cgi.pm >here is the code that I am trying to use, what the heck is wrong > >Code >declarations: use strict; # just in case you forgot :-) >use CGI qw/:ALL/; >$cgi = ne

RE: How do I edit the tab of an Excel worksheet?

2003-03-10 Thread csaba . raduly
On 07/03/2003 20:06:49 "Joel Brockman" wrote: > >Csaba, >Thank you for your effort. ActiveState provided me with an html document >containing a link to OLE Browser. The link brings up a blank page. That should not happen. Is that C:\Perl\html\OLE-Browser\Browser.html ? If there is an error, t

Re: Tk buttons?

2002-12-02 Thread csaba . raduly
On 29/11/2002 23:57:14 perl-win32-users-admin wrote: >>From: Beckett Richard-qswi266 <[EMAIL PROTECTED]> >>To: [EMAIL PROTECTED] >>Subject: Tk buttons? >>Date: Fri, 29 Nov 2002 15:53:27 - >> >> >>When you click on a button to do a task, the button should stay "pressed" >>until the task comple

RE: :Telnet on Win2K

2002-11-28 Thread csaba . raduly
On 28/11/2002 03:23:01 perl-win32-users-admin wrote: >I think no one has got this to work yet because none of us has banged our >head hard enough onto the desk top. > >And all this just to remotely power down a Win2K box.:) >I'll post what I come up with. > use Win32; Win32::InitiateSystemShutdo

Re: Can arrays be used as scalars?

2002-11-28 Thread csaba . raduly
On 24/11/2002 08:06:35 RCTay wrote: >my( @dir, $free); >@dir =3D `dir`; >$free =3D $dir[$#dir]; > >This code was written by a friend of mine. "@dir" was declared as a array, but >in the second line it is used as a scalar. How is that possible? There are no >warnings given by the interpreter. C

Re: Excel to html format

2002-11-26 Thread csaba . raduly
On 25/11/2002 21:13:28 perl-win32-users-admin wrote: >Hello, > >    I have an Excel spreadsheet that a person saves to a network drive >daily.  I want to automate the task of opening the file and saving it as html >(the person can't do it themselves, their not technical enough! ).  I know th

Re: Regular Expression Problem

2002-11-20 Thread csaba . raduly
On 20/11/2002 13:06:29 Lee Cullip wrote: >Thanks for replying Joe, >maybe if you see a bit more code you can get an idea for what I'm trying to >do : > >use Net::Telnet; >use IO::File; > >$prmpt =~ /^(.*:\/home\/oracle[:=>]{1,2})/; [snip] > >I still get the following error message though : > >ba

RE: Browsing for SMB machines using a network broadcast? (Peter McGowan)

2002-11-14 Thread csaba . raduly
On 14/11/2002 11:17:57 Geoffrey Leeming wrote: >Thanks for the reply. Unfortunately that tells me what the PDC thinks is >there, rather than what necessarily *is* there :-) One of the many reasons I >run this script is to check for unauthorised machines on our physical network, >so I need to ex

RE: [PMX:##] Hello Hello

2002-11-05 Thread csaba . raduly
On 04/11/2002 20:52:02 Joseph P. Discenza wrote: >Scott Carr wrote, on >: The problem. I have a Hex string like >: 54686973206973206120746573740d0a546f2073656520686f772077656c6c20 >: >: I want to convert it to its binary representation. I am using a >: command like pack("H*", $hexstring) to get

Re: Win32::Registry - Why won't this work??

2002-11-05 Thread csaba . raduly
On 04/11/2002 20:23:12 Steve Silvers wrote: >The below snippet gives me the error: "Can't call method Open on an >undefined value". > >#!/Perl > >use Win32::Registry; > >$reg = $HKLM->Open('SOFTWARE\\Microsoft\\Office'); > die "Registry open failed: $!, $^E" unless defined $reg; ># print out

Re: Terrible at my logic - some more inputs

2002-10-25 Thread csaba . raduly
On 25/10/2002 15:37:16 Krisna, Hari wrote: >forgot to include the print statement > >print OUTPT "$ln54_1 $ln54_2 $ln54_3 $ln54_4 $ln54_5 $ln54_6 $ln54_7 $ln54_8"; > change this to: print OUTPT "$ln54_1!$ln54_2!$ln54_3!$ln54_4!$ln54_5!$ln54_6!$ln54_7!$ln54_8!"; You separate the columns with

Re: Catching what is travelling from and to your browser

2002-10-20 Thread csaba . raduly
On 19/10/2002 09:35:23 perl-win32-users-admin wrote: >Greetings to all, > >I would like to write a simple Perl script (for Win32) able to catch >what my browser is sending and receiving (especially the headers) during >a particular http transaction. It sounds to me that what you want is a HTML p

Re: working with array references.

2002-10-14 Thread csaba . raduly
On 13/10/2002 01:30:18 perl-win32-users-admin wrote: >Hi list, > >given an array reference in a hash, how can I append an item to the end of >that array? Or find the length so that I can assign it using $ref-[$n] >type notation? > >I have tried various comboes... > >$hash{$key} holds a reference

Re: What is the HTTP REFERER story?

2002-10-07 Thread csaba . raduly
On 06/10/2002 23:19:46 perl-win32-users-admin wrote: >Some browsers do not send the referer header. This variable seems so >useful, I'm wondering why it is being left out. Is it an error? Is it Some people consider REFERER a privacy leak (and have written browsers which don't send it by design

RE: Regualr Expression Again...

2002-09-11 Thread csaba . raduly
On 11/09/2002 14:53:05 Barlow, Neil wrote: > >I am looking to match \ at the end of the line - >Have tried $scandir=~/\\$/ and am still not getting a match >My input is C:\ > Run your script with perl -Mre=debug yourscript.pl That will show you what the regular expression engine is doing (mak

Re: URGENT...need special system call...URGENT

2002-09-11 Thread csaba . raduly
On 10/09/2002 20:56:39 perl-win32-users-admin wrote: >I am having problems with a system call. I used perl2exe with a -gui >option, which means that no command prompt will pop up during execution and >the compiled script remains hidden. The problem is...Now that I did that, >my system call to

RE: Regualr Expression

2002-09-11 Thread csaba . raduly
On 10/09/2002 15:55:14 perl-win32-users-admin wrote: >> oops, do that and you'll confuse it. swap that for >> >> $dir=~s'\'/'g; #not interpolated with single quotes > >Huh? I've never heard of that. It doesn't work for me either. What version >of Perl are you using, and where is this documented?

Re: Regualr Expression

2002-09-10 Thread csaba . raduly
On 10/09/2002 15:37:44 perl-win32-users-admin wrote: >>$dir=~s!\!/!g; #should work better, no ambiguity with slashes > > >oops, do that and you'll confuse it. swap that for > >$dir=~s'\'/'g; #not interpolated with single quotes > >~or~ > >$die=~s!\\!/!g; > There's also: $die =~ tr!\\!/!;

RE: Current directory path

2002-09-04 Thread csaba . raduly
On 04/09/2002 11:51:33 Tillman, James wrote: >> >> [EMAIL PROTECTED] wrote: >> > >> > >> > Hi! >> > >> > There is some way to get the current directory path of perl script? ^ >> >> Try core Cwd module. > >That actually returns the current directo

[PMX:#] RE: Collections in 'Scripting.FileSystemObject': in works, ->Item(...) doesn't -- why?

2002-08-28 Thread csaba . raduly
On 28/08/2002 13:07:51 perl-win32-users-admin wrote: >On 28/08/2002 12:00:58 I wrote: > >>> Hi, Jan suggested I post this here. Maybe the first question is >>> why I would need the 'Scripting.FileSystemObject' in Perl, but >>> I have my reasons. I was actually testing the Win32 intellisense >>

RE: Collections in 'Scripting.FileSystemObject': in works, ->Item(...) doesn't -- why?

2002-08-28 Thread csaba . raduly
On 28/08/2002 12:00:58 perl-win32-users-admin wrote: >> Hi, Jan suggested I post this here. Maybe the first question is >> why I would need the 'Scripting.FileSystemObject' in Perl, but >> I have my reasons. I was actually testing the Win32 intellisense >> in Visual Perl, but found I could wri

RE: best way to list/remove network connections

2002-08-21 Thread csaba . raduly
Brian Gibson wrote: > Does anyone know of a module you can use to list all of the current > connections to remote shares (whether they be to a UNC path or to a > drive letter) so they can be disconnected? > > I thought Win32::LanMan could do this but when I run "install > Win32::Lanman" from PPM

Re: if & unless inverses ???

2002-08-20 Thread csaba . raduly
On 20/08/2002 17:23:11 perl-win32-users-admin wrote: >Cleaning up some inherited code and I ran into this: > >if ( ! $m_rkCfgTable->{Trace} eq "true") { >$m_nTraceLevelMin = -1; >return 0; >} > >For the life of me, I cannot fathom why this is *not* identical? > >unless ($m_rkCfgTable->{Trace} eq

Re: trying to understand how regex works

2002-08-13 Thread csaba . raduly
On 13/08/2002 06:26:59 perl-win32-users-admin wrote: >Hi all, >I guess it must be a simple problem, but it's a >mystery to me. [snip question involving regex] > >Anybody cares to explain this to me? Try running your script with perl -re=debug scriptname.pl 2>re_debug Make sure you redirect st

Re: Win32::OLE: Language of error message?

2002-07-31 Thread csaba . raduly
On 31/07/2002 12:34:14 perl-win32-users-admin wrote: >- Original Message - >From: "Dr. Thomas Bruns" <[EMAIL PROTECTED]> > >> >> Win32::OLE(0.1502) error 0x80020010: "Aufgerufener ist ungAültig" >> in METHOD/PROPERTYGET "myMethod" at myModule.pm line 123 >> >> I am German, but this m

Re: how to match '*'

2002-07-10 Thread csaba . raduly
On 09/07/2002 22:12:58 perl-win32-users-admin wrote: >I am trying to match the '*' character and am having trouble getting anything. >Basically, I have some lines that I want to extract only if they start with a >'*'. > >Seems easy enough. > >if ($line =~ /^\*/) >{ >    print "Match! $line\n

RE: Help!

2002-06-13 Thread csaba . raduly
On 13/06/2002 17:47:01 Chris Anderson wrote: [snip] > >What is my problem: > >It work: No, it doesn't , unless you have a program with a VERY interesting name in C:\winnt, called "system32 sh.exe" (including the linebreak !) >Win32::Process::Create($ProcessObj, > 'c:\\winnt\

Re: Send email in ActivePerl using SMTP

2002-06-12 Thread csaba . raduly
On 06/06/2002 22:00:09 Yi Zhang wrote: >I tried the following to use SMTP to send email: > > >use Net::SMTP; >$optServer = 'luxn.com'; >$optFrom = "[EMAIL PROTECTED]"; >$optTo = "[EMAIL PROTECTED]"; >$smtp = Net::SMTP -> new ("luxn.com"); >$smtp -> mail($optFrom); [snip rest of script] >What m

Re: use lib failing on IIs

2002-06-07 Thread csaba . raduly
On 06/06/2002 22:24:36 perl-win32-users-admin wrote: >Group, > >I got all my stuff run on my local box with perl/apache/mysql and then I >went to move everything to the main IIs server. However. when I ran my >scripts that worked before in the same directory structure on my local box I >got

Re: Win32::API and GetOpenFileName

2002-06-06 Thread csaba . raduly
On 06/06/2002 00:42:42 Dax T Games wrote: >Anyone been able to import the GetOpenFileName API from comdlg32.dll. > >So I don't need to reinvent the wheel? I have been trying but have had no >success. > GetOpenFileName puts up a dialog box. You might need a message loop. (I think Perl.exe is a

Re: Determining Default 'My Documents' folder path

2002-05-30 Thread csaba . raduly
On 30/05/2002 15:24:40 perl-win32-users-admin wrote: >I have been looking for a way to determine the path of the 'My Documents' >folder for a PC. I assume this is a registry setting. I did a search for >this through MY registry and the only potential references I can find refer >to a shell32.d

Re: Regex matching pairs?

2002-05-23 Thread csaba . raduly
Run this: perldoc -q balanced -- Csaba Ráduly, Software Engineer Sophos Anti-Virus email: [EMAIL PROTECTED]http://www.sophos.com US Support: +1 888 SOPHOS 9 UK Support: +44 1235 559933 __

ActivePerl help file

2002-05-22 Thread csaba . raduly
Is there an ActivePerl.chm with a working index ? The one in build 630 has a completely empty index :-( -- Csaba Ráduly, Software Engineer Sophos Anti-Virus email: [EMAIL PROTECTED]http://www.sophos.com US Support: +1 888 SOPHOS 9

RE: Archive Zip Help

2002-05-01 Thread csaba . raduly
On 30/04/2002 18:40:35 Joseph Jongquist wrote: >Hello Carter, > >Try these suggestions: > >>my $dir = "C:/tmp2"; >CHANGE TO: >my $dir = "C:\\tmp2"; > AARGH ! Please don't ever suggest that. Perl is perfectly capable of understanding "C:/tmp2" Even Windows understands "C:/tmp2". The onl

Re: Basic Perl question

2002-04-25 Thread csaba . raduly
On 22/04/2002 06:49:52 perl-win32-users-admin wrote: >Dear All, >I have seen one perl code with the following stuff > >sub func_name($$$) >{ >$a = @_; >} > >My question is , > >What is the purpose of $$$ in the function definition. > It tells Perl that func_name expects three scalars. Check