Re: Autoloader error

2002-06-13 Thread Sisyphus


- Original Message -
From: "Nathan Rimmer" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, June 14, 2002 4:24 PM
Subject: Autoloader error


> I am trying use the Cast5_PP encryption module but am
> getting an error related to the Autoloader module:
>
> Can't locate auto/Crypt/CAST5_PP/autosplit.ix in @INC
> (@INC contains: C:/Perl/lib C:/Perl/site/lib .) at
> C:/Perl/lib/AutoLoader.pm line 146.
> Can't locate auto/Crypt/CAST5_PP/init.al in @INC (@INC
> contains: C:/Perl/lib C:/Perl/site/lib .) at
> C:/Perl/lib/Crypt/CAST5_PP.pm line 15
>
> The first error seems to be happening because
> Autoloader is looking for autosplit.ix in a folder
> that did not exist. I tried manually creating the
> folder and putting the file in it - but got the same
> error.
>
> Could I solve the error by editing the faulty line in
> Autoloader.pm ? (ie $path
> ="auto/$calldir/autosplit.ix";)
>
> The second error is seems to be the same problem.
>
> Thanks,
> Nathan
>

No - 'perl\site\lib\auto\crypt\CAST5_PP\'  *should* contain the files
'autosplit.ix', 'decrypt.al', 'encrypt.al', and 'init.al'.

If that folder does not exist (or is missing those files) then there is
something wrong with your installation process.

How did you install the 'CAST5_PP' package ?

Cheers,
Rob

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Autoloader error

2002-06-13 Thread Nathan Rimmer

I am trying use the Cast5_PP encryption module but am
getting an error related to the Autoloader module:

Can't locate auto/Crypt/CAST5_PP/autosplit.ix in @INC
(@INC contains: C:/Perl/lib C:/Perl/site/lib .) at
C:/Perl/lib/AutoLoader.pm line 146.
Can't locate auto/Crypt/CAST5_PP/init.al in @INC (@INC
contains: C:/Perl/lib C:/Perl/site/lib .) at
C:/Perl/lib/Crypt/CAST5_PP.pm line 15

The first error seems to be happening because
Autoloader is looking for autosplit.ix in a folder
that did not exist. I tried manually creating the
folder and putting the file in it - but got the same
error.

Could I solve the error by editing the faulty line in
Autoloader.pm ? (ie $path
="auto/$calldir/autosplit.ix";)

The second error is seems to be the same problem.

Thanks,
Nathan

__
Do You Yahoo!?
Everything you'll ever need on one web page
from News and Sport to Email and Music Charts
http://uk.my.yahoo.com
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Mail::Pop3Client

2002-06-13 Thread desarrollo

Hi!

Is there a way to mark messages as read inmediately after you read it with
Mail::Pop3?

I see the messages are shown as read only after I delete one of the
incoming messages. But what if I want them marked as read just after I
read them?

Any help would be appreciated.

Thanks in advance,
Mauricio

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: INFO: Win32::IProc

2002-06-13 Thread David N. Blank-Edelman

[Grant: my message to you wasn't meant to be a public message. In the
future it would be better if you would ask first before forwarding private
communication to a public forum, thanks!]

On Thu, 13 Jun 2002, Grant Hopwood wrote:

> Jenda and myself chose the latter. I hope the community doesn't object to
> much to this.

I think the concern is more likely to be legal. I appreciate your efforts
to keep the useful modules available, but I also think it is important to
respect the wishes/rights of individual module authors. Personally, I'm
still be concerned about relying on totally orphaned modules like this.

-- dNb

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: e-mail question

2002-06-13 Thread Giovanni Zezza

Il Thu, 13 Jun 2002 00:39:18 -0400, scrivevi:

>I really like Perl but don't see the reason to use it in this case.

The "automate" thing, perhaps, to say one.

I know you can use Outlook via ActiveX (or whatever they call it this week)
too; but then why not to use a simple, standard and multi-plataform, perl
module, instead?

Ciao.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: e-mail question

2002-06-13 Thread Giovanni Zezza

Il Wed, 12 Jun 2002 09:48:47 -0400, scrivevi:

>-  I have a list of e-mail addresses (in a text file) of people that I send
>   mail to regularly (about 100 people).   
>-  I want to attach a (Word) document 
>
>How could I automate sending the mail - 

I have a thing. It gets the addresses from a text file, the name(s) of
document(s) you want to send from another text file, zips the document(s),
looks for a "tip of the day" message or a general comment to prefix the
attachment with, builds a mime message (with MIME::Entity), then sends all
(with Net::SMTP) to your provider mail server. It sends a single message
with multiple recipients, so many as permitted by your provider, then
again, if needed, to the end of your addresses list.

It's very rough, very idiomatic, very not documented. I've no problem to
send it to you, though, provided you take it as it is, doing yourself the
needed changes, and don't ask me or name it anymore in our conversation.
Otherwise it will be changed on dust of withered and dried bytes on your
disk.

... or, as a better idea, you may take a look to Mail::Bulkmail. It hasn't
the mime thing, but you can add it yourself (via MIME or so).

Ciao.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: Re: From Vladimirs

2002-06-13 Thread C. Church

- Original Message -
From: "Chris Anderson" <[EMAIL PROTECTED]>

> And yes, he has tried forward slashes, versus backward slashes
> to no avail.
>

> Win32::Process::Create($ProcessObj,
>'c:\\windows\\system32\\rsh.exe',
>"rsh 213.165.192.242 -l intercable sh accounting >a.log",
>0,
>NORMAL_PRIORITY_CLASS,
>'c:\\test');
>$ProcessObj->Wait(2000);
>
> and get message
>
> Line has invalid autocommand "sh accounting >a.log"

Firstly, that looks like an error from RSH, not windows or perl.

Secondly, regarding the 'firstly' statement above, what makes one assume
that command or cmd is executing the process with Win32::Process?

The output redirection '>' is a function of the command interpreter, not of
RSH.  If you are operating without a command interpreter (i.e. shell), you
will not have access to such a function.  It looks to me like RSH is sending
that whole string to the remote server.  Do you intend to send the output of
the remote command to a log file on the remote server?  If so, you'll
probably have to quote the command to RSH.  Otherwise, you'd probably do
better to specify the command interpreter, e.g.: (not tested!)

 Win32::Process::Create($ProcessObj,
'c:\\windows\\system32\\command.com',
"command rsh 213.165.192.242 -l intercable sh accounting
>a.log",
0,
NORMAL_PRIORITY_CLASS,
'c:\\test');
$ProcessObj->Wait(2000);

HTH,

!c


___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: If..else scope - THANKS!

2002-06-13 Thread Denis Pleic


Thanks to everyone for their answers - some of them were really 
helpful, and most of them solved my problem.

However, Ron's answer (slurping everything into a hash) made me 
want to drop Perl forever... :-(

I'll never be able to concoct something like that on my own :-(((

Thanks to all who replied.

Regards,

Denis

-
Croatian Translation & Language Services * [EMAIL PROTECTED]
+
Denis Pleic  | Phone: (+385) 42 305 751 
M. Vrhovca 6 | Fax: (+385) 42 305 752
HR-42000 Varazdin| Mobile: (+385) 98 798 323
 CROATIA | http://www.hrtranslations.com

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



RE: Re: From Vladimirs

2002-06-13 Thread Joe Schell


> -Original Message-
> Behalf Of Chris Anderson
> 
> 
> Here is Vladimir's reply...
> 
> And yes, he has tried forward slashes, versus backward slashes
> to no avail.

Here is a guess (using the escape character for the NT shell.)

"rsh 213.165.192.242 -l intercable sh accounting ^>a.log"


> 
> Original Message ---
> I starting script 
> 
> #1
> 
> Win32::Process::Create($ProcessObj,
>'c:\\windows\\system32\\rsh.exe',
>"rsh 213.165.192.242 -l intercable sh accounting >a.log",
>0,
>NORMAL_PRIORITY_CLASS,
>'c:\\test');
>$ProcessObj->Wait(2000);
>  
> and get message 
> 
> Line has invalid autocommand "sh accounting >a.log"
> 

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



RE: Re: From Vladimirs

2002-06-13 Thread Chris Anderson

Here is Vladimir's reply...

And yes, he has tried forward slashes, versus backward slashes
to no avail.

Original Message ---
I starting script 

#1

Win32::Process::Create($ProcessObj,
   'c:\\windows\\system32\\rsh.exe',
   "rsh 213.165.192.242 -l intercable sh accounting >a.log",
   0,
   NORMAL_PRIORITY_CLASS,
   'c:\\test');
   $ProcessObj->Wait(2000);
 
and get message 

Line has invalid autocommand "sh accounting >a.log"

213.165.192.242 - this address CISCO
intercable - my server name

I make BAT file with string

@rsh 213.165.192.242 -l intercable sh account >user.log

and starting 

#2

 Win32::Process::Create($ProcessObj,
"C:\\Test\\user.bat",
"user.bat",
0,
NORMAL_PRIORITY_CLASS,
"C:\\Test");
$ProcessObj->Wait(2000);

All working

But, why not working  #1 ?

I got answer by Jonathan
and add \\ to string

while () { Win32::Process::Create($ProcessObj,
   'c:\\windows\\system32\\rsh.exe',
   "rsh 213.165.192.242 -l intercable sh accounting \\>a.log",
   0,
   NORMAL_PRIORITY_CLASS,
   'c:\\test');
   $ProcessObj->Wait(2000);
 }

and have 
Line has invalid autocommand "sh accounting \\>a.log"

:(

Or I stupid, or BUG developers :)

Own problem, after other problem, after ..
That is do ?

Maybe again return to MASM32?

Thanks,
Vladimir

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



RE: Sharing new Perl Modules

2002-06-13 Thread Joe Schell



> -Original Message-
> Behalf Of Morgan, Steve H.
>
> Does anyone know what the process is to submit new perl modules to Active
> State?

Just as a guess, with the exception of the modules specifically maintained
by ActiveState employees, everything else comes from CPAN (www.cpan.org).
Actually the modules from the employees go there as well, but the order is
reversed (they show up in ActiveState first then show up in CPAN.)

Once there then you can request that ActiveState puts it in their build list
(ppm repository.)  Not sure what that entails, but I believe part of it
involves running the 'tests' part of the standard module and verifying that
it works.  Of course there is probably some subjective evaluation as to
whether it is worth their time.


> Once they are submitted, what is the process for keeping them up
> to date and
> posting the documentation?
>

Via CPAN.  And then requesting that the ppm be updated.

> Is there a way to install my perl library's documentation into active
> state's web documentation during the install process?
>

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



RE: e-mail question

2002-06-13 Thread Capacio, Paula J

Wening Andreas wrote:
>Sent: Wednesday, June 12, 2002 11:39 PM
>Why do you want to use Perl for this? 
>If you are already using Outlook, import the addresses in 
>Outlook and create group. Everything you have to do then 
>is only creating 1 email with the attachment to that group.
>I really like Perl but don't see the reason to use it in this case.



I can't say what the original poster's intent was, but here it is used to automate a 
process. Specifically an Oracle database is updated by a non-Perl process, then a Perl 
process runs and creates an Excel spreadsheet using parts of the updated data, the 
spreadsheet is then distributed to a list of users.  This all runs without human 
intervention at about 2am.
Paula  
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: If..else scope problem?

2002-06-13 Thread Ron Grabowski

> Here's a revised version of your code.  It puts the data into a hash, whence
> you can retrieve it in any order you like (the output line at the end is
> just an example of one way).

I just put everything into the hash and dealt with it later:

---
use strict;
use warnings;
use vars qw(%H);

while (  ) {
  chomp;
  if ( m## .. m## ) {
   s#]*)>##g or next;
   $H{$1} = $_;
  }
}

$H{DatumValute} =~ s/()(..)(..)/$3.$2.$1/;
$H{Iznos} = ($H{Oznaka} eq 'D' ? '-' : '+') . $H{Iznos};

printf("%-16s%-16s%-24s%-s",
  @H{qw|DatumValute Naziv Svrha Iznos|});

__DATA__

0102017910001874
20020409
20020409
MEDICOM D.O.O.
2484008
1100342506
00
PLACANJE FAKTURE

00
17-020305


99



P
2712,06


---

09.04.2002  MEDICOM D.O.O.  PLACANJE FAKTURE+2712,06

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



FW: LINK CHECKER (off topic)

2002-06-13 Thread Todd_Hemsell

I received the following email from someone in response to My response to a
question on the list.
I have tried my best to interpret it...

> Ker ste nam pisali = "I have a pistol"
> smo vas avtomaticno = "It is an Automatic"
> na NORM E-postno listo = = "Norm, say NO to Posting"
> Obvescali vas bomo o novostih = "Obviously I will bomb your House"
> pri nas in na nasih spletnih straneh. = (Expletives about me mum deleted)
> Direktor = A K replacing a C, obviously KGB

;-)





-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Thursday, June 13, 2002 9:24 PM
To: [EMAIL PROTECTED]
Subject: RE: LINK CHECKER


SLOVENSKO (SLOVENIAN):

Lepo pozdravljeni.

Ker ste nam pisali, smo vas avtomaticno prijavili na NORM E-postno listo.
Obvescali vas bomo o novostih pri nas in na nasih spletnih straneh.

Iz NORM mailing liste se lahko odjavite kadarkoli, ce posljete
prazno E-postno sporocilo na naslov [EMAIL PROTECTED]

Hvala za vas interes in razumevanje.
Tomi Meglenov - Direktor

--
NORM - multimedia studio
SPLETNA, AUDIO IN VIDEO PRODUKCIJA
Meglenov NORM, raèunalnistvo k.d.
Ul Bratov Uèakar 26, 1000 Ljubljana
Tel.: 01/510-8-510 GSM:041/6-90-90-6
mailto:[EMAIL PROTECTED]
http://www.normstudio.com



ENGLISH (ANGLESKO):

Hello and wellcome.

Because you wrote to us, we automatically added you to our mailing list.
We will inform you about our new activities and updates on our web page.

You can unsubscribe from our mailing list any time if you want.
Just send blank Email to address [EMAIL PROTECTED]

Thank you for your interest and understanding.
Tomi Meglenov - Director

--
NORM - multimedia studio
INTERNET, AUDIO AND VIDEO PRODUCTION
Meglenov NORM, raèunalnistvo k.d.
Ul Bratov Uèakar 26, 1000 Ljubljana
Tel.: 01/510-8-510 GSM:041/6-90-90-6
mailto:[EMAIL PROTECTED]
http://www.normstudio.com

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



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\\system32\rsh.exe',
^^
Hint: that's not an 'r', there. ^^

Please use forward slashes in the future, unless you are constructing
a commandline for CMD.EXE, COMMAND.COM, or any of the legacy commands
(XCOPY, etc). Every component of Win32 understands forward slashes
'/' as path separator, except for the command interpreter.

> 'rsh x.x.x.x -l compname sh account',
> 0,
> NORMAL_PRIORITY_CLASS,
> '.');
>$ProcessObj->Wait(2000);
>
>:)
>
>IT DON'T WORK !
>Win32::Process::Create($ProcessObj,
>   'c:\\winnt\\system32\rsh.exe',
>   'rsh x.x.x.x -l compname sh account >account.log',
>   0,
>   NORMAL_PRIORITY_CLASS,
>   '.');
>$ProcessObj->Wait(2000);
>
>WHY?
>

"It don't work" is not good enough as a description of a problem.
What do you expect to happen ? What is happening instead ?


--
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

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs