CPAN failure

2004-09-16 Thread Grant
I'm trying to install Bundle::InterchangeKitchenSink with: perl -MCPAN -e 'install Bundle::InterchangeKitchenSink' but I run into this: Test returned status 2 (wstat 512, 0x200) Failed Test Stat Wstat Total Fail Failed List of Failed

Re: HoH not building as expected

2004-09-16 Thread Mark Goland
- Original Message - From: "Wiggins d Anconia" <[EMAIL PROTECTED]> To: "Mark Goland" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> Sent: Thursday, September 16, 2004 1:27 PM Subject: Re: HoH not building as expected > > > > > > > > > > I expact the output to be > > > > > > > > Unknown =>: >

Time Trigger

2004-09-16 Thread Roime bin Puniran
How to make time trigger using Perl ?...any hint?... This e-mail and any attachments may contain confidential and privileged information. If you are not the intended recipient, please notify the sender immediately by return e-mail, delete this e-mail and destroy any copies. Any dissemination or us

Re: Time Trigger in perl.....

2004-09-16 Thread Wiggins d'Anconia
Roime bin Puniran wrote: I want to set a time that, when the program tringer catch that expected time, the program will run...how can i write it in perl..can anybody give a hint... Sorry, my english is not well... Thanks Check out the C function, it is specifically for this purpose. perldoc -f ala

failure with: system("dir /b"); exec("dir /b"); `dir /b`

2004-09-16 Thread A B C
Greetings, Does anyone know how to get perl to run windows commands like "dir /b". Specifically, perl doesn't accept any type of argument switches. I've tried system(), exec() and backticks in my script. However, If I remove the switch, for example: system("dir"). This works fine. But I need tho

Time Trigger in perl.....

2004-09-16 Thread Roime bin Puniran
I want to set a time that, when the program tringer catch that expected time, the program will run...how can i write it in perl..can anybody give a hint... Sorry, my english is not well... Thanks This e-mail and any attachments may contain confidential and privileged information. If you are not

insert data with Perl into multiple MySQL tables

2004-09-16 Thread Maxipoint Rep Office
How insert data with Perl into multiple MySQL tables? I can not find any clear advice.. this is for TABLE1: # Connect to the database. my $dbh = DBI->connect("DBI:mysql:database=;host=localhost", "username", "pass", {'RaiseError' => 1}); # now

Re: $ ^ I in place editor

2004-09-16 Thread Peter Scott
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED] writes: >its not that I do not understand its purpose, but maybe how to use it??? I >am curious b/c this has worked for me before in other programs. I will >send this whole code. Posting hundreds of lines of code that have nothing to do with wh

Re: $^ I

2004-09-16 Thread John W. Krahn
[EMAIL PROTECTED] wrote: Here is my entire code. I need help in getting the in place editor working b/c from my reading this is correct! ## Set pragmas use strict; use diagnostics; use MIME::Lite; use Net::FTP; Only all lowercase modules are pragmas, the rest are

Re: Time Skip

2004-09-16 Thread John W. Krahn
Anish Kumar K. wrote: $filename = "data_logfile" .(localtime). ".txt"; open(LOG, ">>$filename") || die "cannot append: $!"; when I compile the file is says "Invalid argument". This is because of the colon character. Suppose after one activity I want to update the log activities in one file say da

Re: Net ::FTP and subroutine calls

2004-09-16 Thread Chris Devers
On Wed, 15 Sep 2004 [EMAIL PROTECTED] wrote: > no nothing is showing up in the file. Okay then, so this logging code is all hand-written ? It seems then that nothing in this script is actually writing to the log file you've asked for, because there's no such thing as "$ftp->$ftplog" (or "$ftp-

$^ I

2004-09-16 Thread DBSMITH
Here is my entire code. I need help in getting the in place editor working b/c from my reading this is correct! Derek B. Smith OhioHealth IT UNIX / TSM / EDM Teams 614-566-4145 - Forwarded by Derek Smith/Staff/OhioHealth on 09/16/2004 03:18 PM - [EMAIL PROTECTED] 09/16/2004 12:04 P

Re: HoH not building as expected

2004-09-16 Thread Wiggins d Anconia
> > > > > > I expact the output to be > > > > > > Unknown =>: > > > VENDOR :Unknown > > > CPU-MODEL :model1 > > > Unknown =>: > > > VENDOR :Unknown > > > CPU-MODEL :Unknown > > > I am confused as to why you think you need a HoHoH, when what you originally displayed above is really a HoAoH becaus

Re: HoH not building as expected

2004-09-16 Thread Mark Goland
- Original Message - From: "Wiggins d Anconia" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]> Sent: Thursday, September 16, 2004 11:30 AM Subject: Re: HoH not building as expected > > Hi All, > > I am trying to build a HoH, who's keys will be referances to > prod

Re: HoH not building as expected

2004-09-16 Thread Wiggins d Anconia
> Hi All, > I am trying to build a HoH, who's keys will be referances to products. However it seems if $e [ vendor value] is the same, the hash get's recreated instead of appending a product to already existing hash. Any ideas would be apreciated, > > #!PERl -w > use warnings; You don't nee

Re: indirect variables in string

2004-09-16 Thread Wiggins d Anconia
> I'm busy writing a script that uses an xml file for various configurations. > Amongst other things I want to move all strings that are printed on screen > into the xml file, to be able to change these texts without hacking the perl > code (eg. for different languages). > > The challenge however

HoH not building as expected

2004-09-16 Thread mgoland
Hi All, I am trying to build a HoH, who's keys will be referances to products. However it seems if $e [ vendor value] is the same, the hash get's recreated instead of appending a product to already existing hash. Any ideas would be apreciated, #!PERl -w use warnings; use strict; use String

Re: interpolating the strings

2004-09-16 Thread Wiggins d Anconia
> On Sep 16, KYu said: > > >I was confront with a such question: how to define the strings, which > >should be interpolated every time when it met? > > > >For example, this code > > > >$var1 = "one"; > >$str = "number $var1, "; > >print $str; > > > >$var1 = "two"; > >print $str; > > > >produce "n

Re: $ ^ I in place editor

2004-09-16 Thread DBSMITH
its not that I do not understand its purpose, but maybe how to use it??? I am curious b/c this has worked for me before in other programs. I will send this whole code. Derek B. Smith OhioHealth IT UNIX / TSM / EDM Teams 614-566-4145 [EMAIL PROTECTED] (Peter Scott) Sent by: [EMAIL PROTECTE

indirect variables in string

2004-09-16 Thread JP
I'm busy writing a script that uses an xml file for various configurations. Amongst other things I want to move all strings that are printed on screen into the xml file, to be able to change these texts without hacking the perl code (eg. for different languages). The challenge however is that I wa

Re: $ ^ I in place editor

2004-09-16 Thread Peter Scott
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED] writes: >In my code I am not understanding why my in place edit does not work? Here >is my code: > >use strict; >use diagnostics; >use warnings; Good! >my stps="/usr/local/log/scratchtps"; > > open (TP, ">$stps") || die "could not open file:$!

Re: interpolating the strings

2004-09-16 Thread Jeff 'japhy' Pinyan
On Sep 16, KYu said: >I was confront with a such question: how to define the strings, which >should be interpolated every time when it met? > >For example, this code > >$var1 = "one"; >$str = "number $var1, "; >print $str; > >$var1 = "two"; >print $str; > >produce "number one, number one" to the

RE: Need some help using lib to add custom directories to @INC

2004-09-16 Thread Wiggins d Anconia
> > > -Original Message- > > From: Wiggins d Anconia [mailto:[EMAIL PROTECTED] > > Sent: Thursday, September 16, 2004 9:03 AM > > To: Ron Goral; Perl Beginners; [EMAIL PROTECTED] > > Subject: Re: Need some help using lib to add custom directories to @INC > > > > > > Please only post to one

Re: SMTP Module

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, Anish Kumar K. wrote: > This is the complete program > > use warnings; > use strict; > use Net::SMTP; > my $ServerName = "*.com"; > # Connect to the server > my $smtp = Net::SMTP->new($ServerName); > die "Couldn't connect to server" unless $smtp; Ok, now that we've v

Re: SMTP Module

2004-09-16 Thread Jenda Krynicky
From: "Anish Kumar K." <[EMAIL PROTECTED]> > When I type telnet *.com 25 > I get like this > > 220 .com ESMTP Postfix > 500 Error: bad syntax > 500 Error: bad syntax > 500 Error: bad syntax > 500 Error: bad syntax > > The Program which I sent you work when

Re: SMTP Module

2004-09-16 Thread Wiggins d Anconia
> On Thu, 16 Sep 2004, Anish Kumar K. wrote: > > > When I type telnet *.com 25 > > I get like this > > > > 220 .com ESMTP Postfix > > 500 Error: bad syntax > > That's okay -- it at least confirms that you have access to a working > SMTP server, and should be able to

Re: interpolating the strings

2004-09-16 Thread JupiterHost.Net
KYu wrote: Hello, I was confront with a such question: how to define the strings, which should be interpolated every time when it met? For example, this code always use strict; use warnings; $var1 = "one"; $str = "number $var1, "; print $str; $var1 = "two"; print $str; You never changed the value

RE: Need some help using lib to add custom directories to @INC

2004-09-16 Thread Ron Goral
> -Original Message- > From: Wiggins d Anconia [mailto:[EMAIL PROTECTED] > Sent: Thursday, September 16, 2004 9:03 AM > To: Ron Goral; Perl Beginners; [EMAIL PROTECTED] > Subject: Re: Need some help using lib to add custom directories to @INC > > > Please only post to one group, if that g

Re: interpolating the strings

2004-09-16 Thread KYu
Hello. Thanks for your answer! > In general you have to continually modify $str, for instance, Yes, I know about such method, but redefining a systring - isn't good way. > Obviously you could set your constant value into a separate variable so > that you could change them all quickly if you want.

Re: SMTP Module

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, Anish Kumar K. wrote: > When I type telnet *.com 25 > I get like this > > 220 .com ESMTP Postfix > 500 Error: bad syntax That's okay -- it at least confirms that you have access to a working SMTP server, and should be able to send messages to it.

Re: Time Skip

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, Jenda Krynicky wrote: > From: Chris Devers <[EMAIL PROTECTED]> > > On Thu, 16 Sep 2004, Anish Kumar K. wrote: > > > $filename = "data_logfile" .(localtime). ".txt"; > > > open(LOG, ">>$filename") || die "cannot append: $!"; > > > > > > > > > when I compile the file it says "

Re: Need some help using lib to add custom directories to @INC

2004-09-16 Thread Wiggins d Anconia
Please only post to one group, if that group does not yield a good answer, then try a different one. Especially since this has nothing to do with CGI. > Can anyone tell me why this code fails when trying to load > Some_Module_In_lib_Dir- > == > my $file_path = > substr

Re: interpolating the strings

2004-09-16 Thread Wiggins d Anconia
> Hello, > I was confront with a such question: how to define the strings, which > should be interpolated every time when it met? > > For example, this code > > $var1 = "one"; > $str = "number $var1, "; Right here Perl interpolates $var1 and stores the complete value into $str, which is set. E

Need some help using lib to add custom directories to @INC

2004-09-16 Thread Ron Goral
Can anyone tell me why this code fails when trying to load Some_Module_In_lib_Dir- == my $file_path = substr($ENV{SCRIPT_FILENAME},0,index($ENV{SCRIPT_FILENAME},'/test.cgi')); use lib "$file_path/../lib"; use Some_Module_In_lib_Dir; == And th

Re: Time Skip

2004-09-16 Thread Jenda Krynicky
From: Chris Devers <[EMAIL PROTECTED]> > On Thu, 16 Sep 2004, Anish Kumar K. wrote: > > $filename = "data_logfile" .(localtime). ".txt"; > > open(LOG, ">>$filename") || die "cannot append: $!"; > > > > > > when I compile the file it says "Invalid argument". This is because > > of the colon charac

Re: SMTP Module

2004-09-16 Thread Jenda Krynicky
From: "Anish Kumar K." <[EMAIL PROTECTED]> > The SMTP Pgms are not working on my windows environment. I am using > Active PERL 5.8. > > please let me know whether I need to install SMTP module, if so where > I can find the module for windows. You can install all kinds of modules via PPM (Perl Pa

Re: can't use Scalar ref...

2004-09-16 Thread Jenda Krynicky
From: "Ing. Branislav Gerzo" <[EMAIL PROTECTED]> > it isn't of course only foo. I am parsing ini file, which looks like: > > [ini] > foo=test > bar=foo [%foo%] bar > > and of course, I want to get (after using some config module) > $bar='foo test bar' Is it really necessary to use [%foo%]? I'm

Re: SMTP Module

2004-09-16 Thread Anish Kumar K.
When I type telnet *.com 25 I get like this 220 .com ESMTP Postfix 500 Error: bad syntax 500 Error: bad syntax 500 Error: bad syntax 500 Error: bad syntax The Program which I sent you work when I telnet into the system and work.. The problem happens when I

interpolating the strings

2004-09-16 Thread KYu
Hello, I was confront with a such question: how to define the strings, which should be interpolated every time when it met? For example, this code $var1 = "one"; $str = "number $var1, "; print $str; $var1 = "two"; print $str; produce "number one, number one" to the output. But what I must to

RE: Time Skip

2004-09-16 Thread Jim
> > $filename = "data_logfile" .(localtime). ".txt"; open(LOG, > ">>$filename") || die "cannot append: $!"; > > > when I compile the file is says "Invalid argument". This is > because of the colon character. > You have answered your own question :). You can't use the : char in the creatio

Re: SMTP Module

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, Anish Kumar K. wrote: > This is the complete program > > use warnings; > use strict; > use Net::SMTP; > my $ServerName = "*.com"; > # Connect to the server > my $smtp = Net::SMTP->new($ServerName); > die "Couldn't connect to server" unless $smtp; > > > Error Message

Re: module issues

2004-09-16 Thread [EMAIL PROTECTED]
Thanks a million. I am now sorted. I installed the perl-devel rpm and did the CPAN install like you said I should. Cool bananas! Quoting Chris Devers <[EMAIL PROTECTED]>: > On Thu, 16 Sep 2004, [EMAIL PROTECTED] wrote: > > > The problem that I am having now is that I am trying to install a new >

Re: SMTP Module

2004-09-16 Thread Anish Kumar K.
Hi Chris This is the complete program use warnings; use strict; use Net::SMTP; my $ServerName = "*.com"; # Connect to the server my $smtp = Net::SMTP->new($ServerName); die "Couldn't connect to server" unless $smtp; Error Message : Couldn't connect to server at smtp.pl line 7. Thanks A

Re: Time Skip

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, Anish Kumar K. wrote: > $filename = "data_logfile" .(localtime). ".txt"; > open(LOG, ">>$filename") || die "cannot append: $!"; > > > when I compile the file it says "Invalid argument". This is because of > the colon character. It is? Why? That colon looks pretty innocent

Re: SMTP Module

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, Anish Kumar K. wrote: > The SMTP [programs] are not working on my windows environment. I am > using Active [Perl] 5.8. > > please let me know whether I need to install SMTP module, if > so where I can find the module for windows. > > Do I need to have SMTP server also.. I

Re: module issues

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, [EMAIL PROTECTED] wrote: > The problem that I am having now is that I am trying to install a new module > (Crypt::SecurID). The easy way to install modules is to use the CPAN shell tool. It can be invoked on the command line by doing a $ sudo perl -MCPAN -e shell The fir

SMTP Module

2004-09-16 Thread Anish Kumar K.
The SMTP Pgms are not working on my windows environment. I am using Active PERL 5.8. please let me know whether I need to install SMTP module, if so where I can find the module for windows. Do I need to have SMTP server also.. Anish

RE: Binary file and pack... What do I have now ?! Feeling lost...

2004-09-16 Thread Jim
> Yet, I still not find anything on pack can do something like that : > > $binarydata = pack "H*', $ascii_str; > $ascii_str = unpack "H*", $binarydata; I think you have it backwards. You fisrt want to *unpack* your string into Hex, than *pack* it back to ascii using the same template. Remember, a

module issues

2004-09-16 Thread [EMAIL PROTECTED]
Greetings again. Thanks to all that answered my last question. That was resolved very quickly. The problem that I am having now is that I am trying to install a new module (Crypt::SecurID). I downloaded the tgz file and extracted that on some dir as root. I then (as per instructions that came wit

Re: include one script in another

2004-09-16 Thread [EMAIL PROTECTED]
Thanks a mil. I will take a look. Quoting Chris Devers <[EMAIL PROTECTED]>: > On Thu, 16 Sep 2004, [EMAIL PROTECTED] wrote: > > > Please help, I need to include one perl script in another. > > Use `require` or `use`. > > Normally I'd point you to perldoc.com, but they seem to be down right >

Time Skip

2004-09-16 Thread Anish Kumar K.
$filename = "data_logfile" .(localtime). ".txt"; open(LOG, ">>$filename") || die "cannot append: $!"; when I compile the file is says "Invalid argument". This is because of the colon character. Suppose after one activity I want to update the log activities in one file say data_logfileTIME.txt

Re: include one script in another

2004-09-16 Thread Chris Devers
On Thu, 16 Sep 2004, [EMAIL PROTECTED] wrote: > Please help, I need to include one perl script in another. Use `require` or `use`. Normally I'd point you to perldoc.com, but they seem to be down right noww, so I'll link to the Google cache as well:

include one script in another

2004-09-16 Thread [EMAIL PROTECTED]
Greetings, Please help, I need to include one perl script in another. The one script is gonna be used as a config file, ie i wanna setup some of the variables on that script so that the user can have a way of configuring the script without playing the real, working one. How do I do this? Ciao --