Search and replace using variables

2001-09-13 Thread Jimson Lee
Here's my problem. I'm using InstallShield to install a custom app at several different sites. Each app at each location has their own cfg file with distinct IP addresses. During the InstallShield, I'd like to preserve that IP info and insert that info into the new cfg file that InstallShield i

Search and replace using a variable

2001-09-13 Thread Jimson Lee
I'm using InstallShield to install a custom app at several locations. On each target machine, is a custom cfg file with unique IP addresses. InstallShield will overwrite this file during installation, but I'd like to extract these addresses and insert them into the newly installed cfg file. I wro

Re: Parse a file

2001-09-13 Thread Jorge Goncalvez
- Begin Forwarded Message - Date: Thu, 13 Sep 2001 10:45:03 +0200 (MEST) From: Jorge Goncalvez Subject: Re: Parse a file Mime-Version: 1.0 Content-MD5: DZmPkpqQxHxJV6ZMZxyK0Q== Hi folks, I wanted to parse a file which is always growing. If this file contains first the

Condolences to US readers

2001-09-13 Thread Andy McDowell
This is to all Americans as a nation, and to foriegners who lost loved ones on September 13. My heartfelt condolences go out to you, and my sincerest wish that you find peace soon. Andy -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

to remove the file extension

2001-09-13 Thread jaya kumaran
hi, In a directory there exist *.c and *.out files. Here *.out is created for every *.c file. I need to check whether .out is generated for all the .c file. How to achive this. Thanks in advance, Jaya -- ___ Get your free email from http://www.in

Re: Search and replace using a variable

2001-09-13 Thread Maxim Berlin
Hello Jimson, Thursday, September 13, 2001, Jimson Lee <[EMAIL PROTECTED]> wrote: [..] JL> Being new to perl, I know how to search for strings. I know how to JL> explicitly search and replace a string. you always can use variable instead of exact string. JL> What I don't know how to do is JL

Re:seek a string

2001-09-13 Thread Jorge Goncalvez
Hi, I would like to open a file and know if a string exists. How can I do this? Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Condolences to US readers

2001-09-13 Thread Mark Maunder
Likewise from us in London. We have been glued to the news for the last two days, haven't really been able to focus on anything productive. Our thoughts are with you during this trying time. -- Mark Maunder Senior Architect SwiftCamel Software http://www.swiftcamel.com mailto:[EMAIL PROTECTED]

Re: to remove the file extension (fwd)

2001-09-13 Thread jaya kumaran
Hi, I found the solution... Thanks -- opendir (DIR_NAME, "."); @fnames = readdir (DIR_NAME); closedir(DIR_NAME); foreach $file (@fnames) { if ($file =~ /\.c$/) { $datfname=$`; print "$datfname\n"; stat($outfname); if( -e $outfname) { print "$outfna

RE: to remove the file extension

2001-09-13 Thread Bob Showalter
> -Original Message- > From: jaya kumaran [mailto:[EMAIL PROTECTED]] > Sent: Thursday, September 13, 2001 5:18 AM > To: [EMAIL PROTECTED] > Cc: [EMAIL PROTECTED] > Subject: to remove the file extension > > > > hi, > > In a directory there exist *.c and *.out files. Here *.out > is c

RE: line end problems - help #2

2001-09-13 Thread Schoeman, Remco
hi ron you are dealing with the difference between dos/win and unix line endings there are plenty of tools to be found on the net to convert unix-text<->dos-text this should get rid of your problems p.s. wordpad.exe should display the file correctly notepad.exe does not(this is the program

Variable interpolation in a format

2001-09-13 Thread Kim Green
Below is my format: format FILE_TOP = New Customers Since Customer Name Creation DateActivation Date . format

FW: Variable interpolation in a format - Disregard

2001-09-13 Thread Kim Green
never mind. > -Original Message- > From: Kim Green > Sent: Thursday, September 13, 2001 9:11 AM > To: '[EMAIL PROTECTED]' > Subject: Variable interpolation in a format > > Below is my format: > > format FILE_TOP = > New Customers Since >

how to write a password generator

2001-09-13 Thread Mike Singleton
What resources can I look at to start writing a password generator from a complete newbie level of knowledge?? === Mike Singleton CCNA, CNE, MCSE Network Analyst (253) 272-1916 x1259 (253) 405-1968 (cellular) [EMAIL PROTECTED] DaVita Inc.

Re: how to write a password generator

2001-09-13 Thread Morbus Iff
>What resources can I look at to start writing a password generator from a >complete newbie level of knowledge?? If you want to mimic Unix passwd, do something like: $seed = (some randomly generated bit of something); $plaintext_password = "password"; $encrypted_password = crypt($p

RE: how to write a password generator

2001-09-13 Thread Sally
Mike, There's a good example of a password script in Learning Perl on Win32 Systems page 17, not very pretty and a bit tedious, but easy to understand. Regards, Sally -Original Message- From: Mike Singleton [mailto:[EMAIL PROTECTED]] Sent: 13 September 2001 14:32 To: [EMAIL PROTECTED]

Re: Gathering output from a program

2001-09-13 Thread Robert Citek
Hello Sofia, What is happening is that only STDOUT is being saved in the @output array. STDERR is still going to the console (your screen). If on a UNIX/Linux system, try adding "2>&1" in front of your command like this: @output = `2>&1 infoerr_parse.pl`; The "2>&1" redirects any output to f

Re:File & Array

2001-09-13 Thread Jorge Goncalvez
Hi, How in Perl you can store each line of a file in an array? Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re:File & Array

2001-09-13 Thread Robert Citek
At 05:27 PM 9/13/2001 +0200, Jorge Goncalvez wrote: >Hi, How in Perl you can store each line of a file in an array? >From section 4.1 in the Perl Cookbook (http://www.oreilly.com/catalog/cookbook/): @bigarray = (); open(DATA, "< mydatafile") or die "Couldn't read from datafile: $!\n"; whil

Re:File & Array

2001-09-13 Thread Curtis Poe
--- Robert Citek <[EMAIL PROTECTED]> wrote: > At 05:27 PM 9/13/2001 +0200, Jorge Goncalvez wrote: > >Hi, How in Perl you can store each line of a file in an array? > > From section 4.1 in the Perl Cookbook > (http://www.oreilly.com/catalog/cookbook/): > > @bigarray = (); > open(DATA, "< mydatafi

RE: Is there a better way to do this

2001-09-13 Thread Bradshaw, Brian
That mostly worked. I had to use a while to get the array from the DB return. I wound up with this to get all the values I needed: while (%result = $finalSet->fetchhash()) { push @arr_DBanswers, values %result; } Is that good code practice? The the camel book (is it a camel) really doesn;t

RE: Is there a better way to do this

2001-09-13 Thread Jeff 'japhy/Marillion' Pinyan
On Sep 13, Bradshaw, Brian said: >while (%result = $finalSet->fetchhash()) >{ > push @arr_DBanswers, values %result; >} That code looks fine. You might want to use 'my' on the %result hash, since you don't need it existing later. while (my %result = $finalSet->fetchhash()) { push @arr_

perl's system() function question.

2001-09-13 Thread Michael Burnside
Using the code below works great if STDOUT is the terminal, but when trying to pipe it to a file the two system() functions run first and the print() statements run second, illustrated below as well. Anyone have a clue why? --BEGIN excerpt from code-- foreach $elem (@test_list) {

RE: Condolences to US readers

2001-09-13 Thread Paskal DRAPIER
I'm very sad of what happened. I'm not able to describe my sadness. I think I'm not far from the truth when I write that all the french people is with you, US nation. It's not very easy to find the good words to say how we feel. I hope you'll find peace in your mind. Best regards, Paskal DRAPIER

RE: Condolences to US readers

2001-09-13 Thread Crandell, Daniel (TIFPC)
This is from an American, we are very thankful that we have friends and allies like you. Especially now! thanks for your well wishes, I think I can speak for all Americans. Thank you! -Original Message- From: Paskal DRAPIER [mailto:[EMAIL PROTECTED]] Sent: Thursday, September 13, 2001 1

Re: to remove the file extension

2001-09-13 Thread _brian_d_foy
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED] (Jaya Kumaran) wrote: > In a directory there exist *.c and *.out files. Here *.out is > created for every *.c file. I need to check whether .out is > generated for all the .c file. How to achive this. you can do something like so. rem

Underline

2001-09-13 Thread John Ertl
Hi I am useing a foremat to print information but I would like to underline some of the information. I have not found a way to do this, does anyone know how? Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re:File & Array

2001-09-13 Thread Robert Citek
Hello Curtis, At 09:12 AM 9/13/2001 -0700, Curtis Poe wrote: >I would try to avoid using DATA as the filehandle as this >may cause confusion with the __DATA__ token. Excellent stylistic point. >Also, if you're going to read the entire file into an array, this >is faster and (IMHO) easier t

Sending a user id and password

2001-09-13 Thread Buffy Press
Hello, I am very new to Perl and I have a question for the list. I have a script that collects URL's from a web site. This web site requires a name and password to access it. When I run the script using Perl -w I get this message: HTTP: Access authorization required. Use the -auth=id:

Weekly list FAQ posting

2001-09-13 Thread casey
NAME beginners-faq - FAQ for the beginners mailing list 1 - Administriva 1.1 - I'm not subscribed - how do I subscribe? Send mail to <[EMAIL PROTECTED]> You can also specify your subscription email address by sending email to (assuming [EMAIL PROTECTED] is your email address)

Re: perl's system() function question.

2001-09-13 Thread Robert Citek
Hello Michael, I tried to duplicate your error, but was unable to. This is my test script which is modelled on your origninal script: #!/usr/bin/perl -w use strict; foreach my $foo qw(a b) { print "$foo\n"; system ("echo hi $foo"); print "hello $foo\n"; print "\n"; } Regardless of

Re: Set locales independent of OS-System

2001-09-13 Thread Michael Fowler
On Thu, Sep 13, 2001 at 02:00:56AM +0200, Andrea Holstein wrote: > I write modules for the german language. > At the moment, I simply tell perl at the beginning > use locale; > > That run's because my Linux is a german one. > At a french one i would'nt run any longer. > > A better way could be (

Re: perl's system() function question.

2001-09-13 Thread Michael Fowler
On Thu, Sep 13, 2001 at 08:23:10AM -0600, Michael Burnside wrote: > Using the code below works great if STDOUT is the terminal, but when > trying to pipe it to a file the two system() functions run first and the > print() statements run second, illustrated below as well. Anyone have a > clue why?

RE: File & Array

2001-09-13 Thread Kipp, James
@array = ; > -Original Message- > From: Jorge Goncalvez [mailto:[EMAIL PROTECTED]] > Sent: Thursday, September 13, 2001 11:28 AM > To: [EMAIL PROTECTED] > Subject: Re:File & Array > > > Hi, How in Perl you can store each line of a file in an array? > > Thanks > > > -- > To unsubscri

Re: Underline

2001-09-13 Thread randy Peterman
I know everything. OK, not really, in fact I don't even know what format you are putting the document in. If you can tell us what format you are putting it in, someone may be able to help you. if its HTML you would surround the text with text to get underlined text. Give us some details. Randy

Re: Sending a user id and password

2001-09-13 Thread Michael Fowler
On Thu, Sep 13, 2001 at 10:10:01AM -0700, Buffy Press wrote: > HTTP: Access authorization required. >Use the -auth=id:pw parameter. > > I have looked in my Programming Perl book and other online Perl > resources and I cannot find any information on -auth. That error message must have bee

Re: Search and replace using a variable

2001-09-13 Thread Jimson Lee
Thanks! Maxim Berlin wrote: > Hello Jimson, > > Thursday, September 13, 2001, Jimson Lee <[EMAIL PROTECTED]> wrote: > > [..] > JL> Being new to perl, I know how to search for strings. I know how to > JL> explicitly search and replace a string. > you always can use variable instead of exact stri

Re: Condolences to US readers

2001-09-13 Thread Francis Henry
Yes, thanks all of you very much. I'm in New York City and my present and former companies have suffered mind-numbing loss. Please keep the victims and their families in your thoughts. It means a great deal to us. There was a chaplain for the NYC Fire Department killed at the World Trade Cente

Re: Sending a user id and password

2001-09-13 Thread Curtis Poe
--- Buffy Press <[EMAIL PROTECTED]> wrote: > Hello, > > I am very new to Perl and I have a question for the list. > > I have a script that collects URL's from a web site. This web site > requires a name and password to access it. When I run the script using > Perl -w I get this message: > >

Math::BigInt

2001-09-13 Thread Richard J. Barbalace
Hi. I'm trying to perform the following calculation: $value = ($float + $integer) * 10; $string = "$value:test"; Here, I know $float has a resolution of millionths. That is, $float multiplied by 1,000,000 should be an integer. However, $float is very large, and multiplying by 1,000,000 cau

RE: Math::BigInt

2001-09-13 Thread Gibbs Tanton - tgibbs
You might want to try Math::BigFloat instead. -Original Message- From: Richard J. Barbalace To: [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Sent: 9/13/2001 2:17 PM Subject: Math::BigInt Hi. I'm trying to perform the following calculation: $value = ($float + $integer) * 10; $string = "$

Installing Module

2001-09-13 Thread Najamuddin, Junaid
Hi, I am using win NT Trying to install Perl module Config::Inifiles I followed every instruction posted on cpan but unable to do it correctly since my script is erroring out can someone please help me with detailed instructions thanks junaid -- To unsubscribe, e-mail: [EMAIL PROTECTED] For addi

Re: line end problems - help #2

2001-09-13 Thread Ron Woodall
Hi All: Curtis "Ovid" Poe wrote: >Just had this problem. To solve: > > cat -vE somescript.pl Remember in all of this that it is not the script that is giving me problems, it is the output of the script in two ways, a heredoc written to an array and a scalar written to an array.

Re: Underline

2001-09-13 Thread brian d foy
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED] (John Ertl) wrote: > I am useing a foremat to print information but I would like to > underline > some of the information. there is nothing in Perl formats that underlines text. if you need such a thing you'll need to use some sort of type

Re: Sending a user id and password

2001-09-13 Thread _brian_d_foy
In article <[EMAIL PROTECTED]>, [EMAIL PROTECTED] wrote: > It's not terribly well-known, but there is an alternative method of > using Basic Authentication. > You should be able to authenticate with the following syntax: > http://Ovid:[EMAIL PROTECTED]/cgi-bin/ascript.cgi this isn't

Re: Sending a user id and password

2001-09-13 Thread Curtis Poe
--- _brian_d_foy <[EMAIL PROTECTED]> wrote: > In article <[EMAIL PROTECTED]>, > [EMAIL PROTECTED] wrote: > > > It's not terribly well-known, but there is an alternative method of > > using Basic Authentication. > > > > You should be able to authenticate with the following syntax: > > >

Re: Re:seek a string

2001-09-13 Thread Nestor Dutko
How about: my $cmd='grep string file'; unless (defined $cmd) { die "string not found"; } > Original Message --- >From: Jorge Goncalvez <[EMAIL PROTECTED]> >To: [EMAIL PROTECTED] >Cc: >Subject: Re:seek a string > >Hi, I would like to open a file and know if a string exists. >How can I do th

RE: to remove the file extension

2001-09-13 Thread Jason Tiller
Hi, Bob, :) This is so great! On Thu, 13 Sep 2001, Bob Showalter wrote: > > -Original Message- > > In a directory there exist *.c and *.out files. Here *.out is > > created for every *.c file. I need to check whether .out is > > generated for all the .c file. How to achive this. > p

Re: Re:seek a string

2001-09-13 Thread Curtis Poe
> > Original Message --- > >From: Jorge Goncalvez <[EMAIL PROTECTED]> > >To: [EMAIL PROTECTED] > >Cc: > >Subject: Re:seek a string > > > >Hi, I would like to open a file and know if a string exists. > >How can I do this? > >Thanks --- Nestor Dutko <[EMAIL PROTECTED]> wrote: > How about: > >

Re: to remove the file extension

2001-09-13 Thread Jason Tiller
Hi, Randall! :) (BTW, great book. :-D In case you hadn't been told enough!) On 13 Sep 2001 [EMAIL PROTECTED] wrote: > > "Bob" == Bob Showalter <[EMAIL PROTECTED]> writes: > Bob> perl -e '-f $_ || print "Missing $_\n" for map {/^(.*)\.c$/; "$1.out"} > Bob> @ARGV' *.c > No. You've used $1

substitution

2001-09-13 Thread thad
given this: $sampletext = "the quick brown fox jumps over the lazy dog. flhdsAFLhaDFLhsldhgflshdvglhsdghsfdgsldfhgsd. ldfhlsadhfajshdkjgshdkjhdskjgvhsfdkjvgkjsvgd sldhgfsd;kqsjflhdvfljhdsahjdsf. lasdFHcalkjsdhfljaHDvgf;lsahdsA ;lsdjflkdsavgl;sadhglskjhdvglhs"; notice that the sample text is a

How to change the @INC contain

2001-09-13 Thread seng-keen . lau
Hi all Can somebody help me how to manually change the @INC contain ? What is the command line to change the @INC Contain ? Thanks Regards SK -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: substitution

2001-09-13 Thread Curtis Poe
--- thad <[EMAIL PROTECTED]> wrote: > given this: > > $sampletext = "the quick brown fox jumps over the lazy dog. > flhdsAFLhaDFLhsldhgflshdvglhsdghsfdgsldfhgsd. > > ldfhlsadhfajshdkjgshdkjhdskjgvhsfdkjvgkjsvgd > sldhgfsd;kqsjflhdvfljhdsahjdsf. > > lasdFHcalkjsdhfljaHDvgf;lsahdsA > ;lsdjflkdsav

Re: IO::Socket

2001-09-13 Thread Newton, Philip
Veeraraju_Mareddi wrote: > Dear List, Which list? You sent this to two lists, as far as I can tell. In Usenet, that would be the equivalent of crossposting, and then I consider it good etiquette to set a "Followup-To" header directing answers to one group only. Setting a Reply-To header here migh

Remote process

2001-09-13 Thread Veeraraju_Mareddi
Dear List How do we execute some script on REMOTE machine. That means I wanna create a process on a remote machine which is my perl script. Is there any module written for this purpose. Can we do it with Win32::AdminMIsc your help and suggestion would be highly appriciated With Regards

IO::Socket

2001-09-13 Thread Veeraraju_Mareddi
Dear List, Please update me any links towards creating SCOKETs, Communicatin on sockets and Communication between processes using Socket communication my script need to contact a process which is on remote machine. Please give me some URLs or IDEAS regarding this. Any documentation with Examp

RE: Remote process

2001-09-13 Thread DePriest, Jason R.
Title: RE: Remote process I currently use an ugly practice... I create a batch file locally, upload it to the remote system using robocopy (from the NT Resource Kit), then use psexec (from sysinternals) to force it to run on the other system. This isn't pleasant, but it works. -J

RE: Password Generators

2001-09-13 Thread Cornish, Merrill
At one time (I no longer work there) Texas Instruments, used a password generator. Their take on the unrememberable problem was to generate a dozen or more, then ask you to pick one. Merrill -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]