OLE Permissions in CGI

2003-12-10 Thread Mike Garner
My guess is that this is more of an IIS 6.0 Security issue but I thought I'd ask some PERL gurus to look through the PERL first. I've written a script that resets the password for a user in our Active Directory for our help desk folks. The script works fine from several computers and works

RE: OLE Permissions in CGI

2003-12-10 Thread Tom Kinzer
Well, I know nothing about this OLE class, but this seems strange: if (my $u = Win32::OLE-GetObject($ADsPath)) { $u-SetPassword( $pass ); $u-Put(pwdLastSet, 0); ... Perhaps a scoping issue with object $u ? How do you know that method call is bad? From a Perl (yes Perl) perspective, this

RE: OLE Permissions in CGI

2003-12-10 Thread Mike Garner
Basically I had the script written like Tom suggested with a or die for this command but it was terminating the program. I used the if/else so I could print out all my variables to debug. I changed it again so the snippet in questions is as follows: . my $u = Win32::OLE-GetObject($ADsPath)

Re: Pattern Match

2003-12-10 Thread mcdavis941
Since we're now talking about performance issues, somebody should say something about precompiling the regular expression, when you can, with either /o or qr(). I had a process's running time go from 2min 45sec to just under 24sec simply by using qr on the relevant regular expressions.

RE: SMTP From field using MIME::Lite

2003-12-10 Thread Paul Harwood
It might be my mail server settings. I am using Exchange Server 2003. SMTP MAIL command failed: 5.5.4 Invalid Address I will check into this more. -Original Message- From: Paul Kraus [mailto:[EMAIL PROTECTED] Sent: Tuesday, December 09, 2003 4:21 PM To: Paul Harwood; Beginner Perl

adding path to $PATH

2003-12-10 Thread Pablo Cusnir
Hi, Is there a way using Perl to add to the environment variable PATH a new path, and that addition will be valid after the script is ran and not only for the script's scope. I'm working in cshell in Solaris 5.8 The regular way to do it in the shell is: setenv PATH my_add_path:$PATH I tried

Help with manipulating a string.

2003-12-10 Thread Mark Weisman
I've got a multiline text box that will feed the ^M at the end of each line. I want to capture it into a single line (which is done), but how do I get it back? Not knowing how many lines there may be with the ^M between them. Currently, I use the old standby: foreach my $rec (@post) {

Re: adding path to $PATH

2003-12-10 Thread Helgi Briem
Pablo Cusnir wrote: Hi, Is there a way using Perl to add to the environment variable PATH a new path, and that addition will be valid after the script is ran and not only for the script's scope. I'm working in cshell in Solaris 5.8 The regular way to do it in the shell is: Yours is a

First module!!! YAAAAY!!! :)

2003-12-10 Thread Ben Crane
Hi all, Just sat done and put together my FIRST MODULE I went through an edited/modifyed text::parsewords and after lots of testing, editing and playing around with...I got it to work! I didn't realize it could be THIS easy! I have been playing around with h2xs and getting really confused.

opening files on remote computers

2003-12-10 Thread Ohad Ohad
Hi, What's the best way to open (for reading) a file on remote computer (in perl) ? Thanks. _ MSN 8 helps eliminate e-mail viruses. Get 2 months FREE*. http://join.msn.com/?page=features/virus -- To unsubscribe, e-mail: [EMAIL

Re: opening files on remote computers

2003-12-10 Thread Andrew Gaffney
Ohad Ohad wrote: Hi, What's the best way to open (for reading) a file on remote computer (in perl) ? Well, what do you need to open the file for? You can do something like mounting the remote FS via NFS, SMB, etc. You can also have an FTP server running on the remote box. You can write client

Re: How do I set up bidirectional pipes over a network connection?

2003-12-10 Thread Dan Anderson
On Tue, 2003-12-09 at 17:41, James Edward Gray II wrote: On Dec 9, 2003, at 4:12 PM, Dan Anderson wrote: Well, I was planning to implement the file transfers using Net::FTP or something similar to keep the problems down. But I want every node to be able to talk to other nodes, i.e. each

Re: How do I set up bidirectional pipes over a network connection?

2003-12-10 Thread Dan Anderson
On Tue, 2003-12-09 at 20:38, John W. Krahn wrote: Dan Anderson wrote: On Tue, 2003-12-09 at 16:31, James Edward Gray II wrote: On Dec 9, 2003, at 3:19 PM, Dan Anderson wrote: I have 2 Linux boxes I want to talk to each other over the local network using a Perl script. Is

Re: opening files on remote computers

2003-12-10 Thread Ohad Ohad
Well, I just want to open the file for reading. somthing like open(FILE, host:file) will be great. Even better if it uses ssh. From: Andrew Gaffney [EMAIL PROTECTED] To: Ohad Ohad [EMAIL PROTECTED] CC: [EMAIL PROTECTED] Subject: Re: opening files on remote computers Date: Wed, 10 Dec 2003

Get file size without downloading

2003-12-10 Thread usef
Hi, Is there any way to get the size of a file without downloading it? I want to write a program using LWP to download a file only if it is bigger than 3K but smaller than 500K. So I need to know the file size in the first place. Thank you. -u -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

RE: Get file size without downloading

2003-12-10 Thread Bob Showalter
usef wrote: Hi, Is there any way to get the size of a file without downloading it? I want to write a program using LWP to download a file only if it is bigger than 3K but smaller than 500K. So I need to know the file size in the first place. You issue a HEAD request to the server and look

Re: Get file size without downloading

2003-12-10 Thread usef
Hi, FTP or HTTP? HTTP, but I want to know the method for FTP as well. Thanks -u PS. Sorry Rus for multiple copy *smacks forehead* -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

Re: adding path to $PATH

2003-12-10 Thread Dan Anderson
On Wed, 2003-12-10 at 01:09, Pablo Cusnir wrote: Hi, Is there a way using Perl to add to the environment variable PATH a new path, and that addition will be valid after the script is ran and not only for the script's scope. I'm working in cshell in Solaris 5.8 The regular way to do it

How to print ... during download

2003-12-10 Thread usef
Thank you guys for quick answers, What if I want to print a ... and calculate the percentage and amount of currently downloaded size during the download process? (wget style), should I create another process to do that? or is there any other alternative? (I will choose the later). Thanks -u --

RE: passing an array

2003-12-10 Thread Bob Showalter
Mike Blezien wrote: Hello, what is the best way to pass an array to a sub routine, IE. You can't pass an array to a sub. You can only pass a list of scalars. my @fields = qw(one two three); send_array(@fields); sub send_array { my @ary = @_; Whatever you passed ends up in @_.

file path pattern matching problem.

2003-12-10 Thread Ben Crane
Hi all, I'm trying to split apart a filepath...e.g: c:\test\abc\what\somefile.txt The length of the filepath will never be constant... e.g: foreach $line (@Path_Filename) { chomp($line); (@Path_Breakdown) = split(/(\w+\W)(\w+\W)/, $line); } but my biggest problem is how to match

Re: opening files on remote computers

2003-12-10 Thread Andrew Gaffney
Ohad Ohad wrote: Well, I just want to open the file for reading. somthing like open(FILE, host:file) will be great. Even better if it uses ssh. This module from CPAN looks promising: http://search.cpan.org/~ivan/Net-SCP-0.06/SCP.pm -- Andrew Gaffney -- To unsubscribe, e-mail: [EMAIL PROTECTED]

Re: Help with manipulating a string.

2003-12-10 Thread James Edward Gray II
On Dec 10, 2003, at 1:39 AM, Mark Weisman wrote: I've got a multiline text box that will feed the ^M at the end of each line. I want to capture it into a single line (which is done), but how do I get it back? Not knowing how many lines there may be with the ^M between them. Currently, I use the

Re: How to print ... during download

2003-12-10 Thread Morbus Iff
What if I want to print a ... and calculate the percentage and amount of currently downloaded size during the download process? (wget style), should I create another process to do that? or is there any other alternative? (I will choose the later). I chatted about this in my book, SPIDERING HACKS:

RE: file path pattern matching problem.

2003-12-10 Thread Balint, Jess
Ben - You can use the File::Basename module for this: Your program would be akin to: foreach $line (@Path_Filename) { chomp($line); $filename = basename($line); # gives you the filename with the extension $location = dirname($line); # gives you the location with no

RE: Get file size without downloading

2003-12-10 Thread Bob Showalter
usef wrote: Hi, FTP or HTTP? HTTP, but I want to know the method for FTP as well. Thanks -u I think that will work for FTP as well. Give it a try. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: opening files on remote computers

2003-12-10 Thread Ohad Ohad
This seems good for COPYing files, I really don't to go there unless I realize I have to . . . I was checking this one : http://search.cpan.org/~nwiger/File-Remote-1.16/Remote.pm But it give me probelms, it complains on ':No such file or directory' for files I know for sure that exists. From:

Re: How to print ... during download

2003-12-10 Thread James Edward Gray II
On Dec 10, 2003, at 8:25 AM, usef wrote: Thank you guys for quick answers, What if I want to print a ... and calculate the percentage and amount of currently downloaded size during the download process? (wget style), should I create another process to do that? or is there any other

RE: Help needed on perl wrappers

2003-12-10 Thread Wiggins d Anconia
Please bottom post... Hi, I was interested in formatted display on screen. I can display ONE text paragraph in any part of the screen with Text::wrap. My question was how to adjust MANY such independent paragraphs in one screen (exactly in a newspaper format where you have 8-10 columns of

Re: Get file size without downloading

2003-12-10 Thread Rus Foster
On Wed, 10 Dec 2003, usef wrote: Hi, Is there any way to get the size of a file without downloading it? I want to write a program using LWP to download a file only if it is bigger than 3K but smaller than 500K. So I need to know the file size in the first place. Hi, FTP or HTTP? Rgds Rus

RE: Get file size without downloading

2003-12-10 Thread Thomas Bätzler
Hello, usef [EMAIL PROTECTED] asked: Is there any way to get the size of a file without downloading it? I want to write a program using LWP to download a file only if it is bigger than 3K but smaller than 500K. So I need to know the file size in the first place. Try making a HEAD request -

RE: Get file size without downloading

2003-12-10 Thread Morbus Iff
Is there any way to get the size of a file without downloading it? I want to write a program using LWP to download a file only if it is bigger than 3K but smaller than 500K. So I need to know the file size in the first place. Try making a HEAD request - that should return file size and last

Re: wildcard File::Copy

2003-12-10 Thread drieux
On Dec 10, 2003, at 2:11 AM, Ben Crane wrote: Drieux, I'm not passing the filehandle, I want to pass a variable that contains the file path...I'm getting the path from a text file, but that text file doesn't contain extensions and each file has multiple extensions. So I need to copy all files

Re: How do I set up bidirectional pipes over a network connection?

2003-12-10 Thread Peter Scott
In article [EMAIL PROTECTED], [EMAIL PROTECTED] (Dan Anderson) writes: I'm writing a perl daemon to do two things: back up important files on multiple boxen so if one gets taken out another will survive, and sync files in users directory from a main server -- i.e. I want to be able to do

RE: Get file size without downloading

2003-12-10 Thread Dan Anderson
On Wed, 2003-12-10 at 09:42, Bob Showalter wrote: usef wrote: Hi, FTP or HTTP? HTTP, but I want to know the method for FTP as well. Thanks -u I think that will work for FTP as well. Give it a try. If I type ls when I FTP into somewhere I get a listing of files and size. I

pick N random lines from a file

2003-12-10 Thread David Garamond
I'm trying to extend the Perl cookbook recipe on how to pick a random line from a file: #!/usr/bin/perl rand($.) 1 ($line = $_) while ; print $line; for picking up to N random lines from a file: start code-- #!/usr/bin/perl die Usage: $0 N, where N is the number of

RE: Help needed on perl wrappers

2003-12-10 Thread Tom Kinzer
Hmmm, yes I don't know of anything off the top of my head, but if you are doing terminal stuff, I would dig around (starting with CPAN of course) for anything with text based menus where you can map areas of the screen. Perl Tk is pretty cool (and well-named, I might add) and not too difficult in

RE: Get file size without downloading

2003-12-10 Thread Jeff Westman
Dan Anderson [EMAIL PROTECTED] wrote: On Wed, 2003-12-10 at 09:42, Bob Showalter wrote: usef wrote: Hi, FTP or HTTP? HTTP, but I want to know the method for FTP as well. Thanks -u I think that will work for FTP as well. Give it a try. If I type ls when I FTP into

UML meets eXtreme v. BDUF v. SEC

2003-12-10 Thread drieux
On Dec 9, 2003, at 7:08 PM, R. Joseph Newton wrote: [..] UML? Isn't that the stuff the once-long-ago-knew-how-to-code professional sycophants use to make pretty pictures for execs, so that the execs can go to bed in the warm contented illusion that they actually understand something about the

Re: Pattern Match

2003-12-10 Thread Rob Dixon
Before I finally burst my cyanide capsule, may I.. ? Rj wrote: Rob Dixon writes: I didn't think it was slick at all. In fact I was disappointed that it looked such a mess, but I don't see a better way. Yes, it is indeed a mess, not only syntacticly, but also semantically. What is a

[ADMIN] Re: Pattern Match

2003-12-10 Thread Casey West
It was Wednesday, December 10, 2003 when Rob Dixon took the soap box, saying: : Before I finally burst my cyanide capsule, may I.. ? No, you may not. I find walking around the block a good way to cool off. Counting to ten has never done it for me, but you may try. *Both* of you. Thanks for

1 doubt.

2003-12-10 Thread Ajey Kulkarni
perl t.pl Name main::FH used only once: possible typo at t.pl line 6. cat t.pl #!/usr/bin/perl use strict; use warnings; open FH, out.dat; Why am i getting this warning? When i remove the warnings,this goes off? Is there any problem if i not include use warnings line? Quick reply is highly

UML meets eXtreme v. BDUF v. SEC

2003-12-10 Thread Robert Brown
(I am deliberately TOP POSTING my reply to this because it seems most appropriate.) B E A U T I F U L L Y S A I D ! ! ! Drieux writes: On Dec 9, 2003, at 7:08 PM, R. Joseph Newton wrote: [..] UML? Isn't that the stuff the once-long-ago-knew-how-to-code professional sycophants use

RE: 1 doubt.

2003-12-10 Thread Stephen Hardisty
Name main::FH used only once: possible typo at t.pl line 6. It's because it's used only once ;o) . If you just declare something (variable, filehandle etc.) but don't use it, something's probably wrong with your code (such as a typo). If you try reading or writing using that filehandle the

Re: 1 doubt.

2003-12-10 Thread James Edward Gray II
On Dec 11, 2003, at 3:27 AM, Ajey Kulkarni wrote: perl t.pl Name main::FH used only once: possible typo at t.pl line 6. cat t.pl #!/usr/bin/perl use strict; use warnings; open FH, out.dat; Why am i getting this warning? When i remove the warnings,this goes off? Is there any problem if i not

Re: 1 doubt.

2003-12-10 Thread perl-beginners
On Thu, Dec 11, 2003 at 09:27:48AM +, Ajey Kulkarni wrote: perl t.pl Name main::FH used only once: possible typo at t.pl line 6. You opened a file, but you do not read from the file. Just opened it. This doesn't make much sense. So you get a warning. cat t.pl #!/usr/bin/perl use

Re: [ADMIN] Re: Pattern Match

2003-12-10 Thread Rob Dixon
Casey West wrote: : Before I finally burst my cyanide capsule, may I.. ? No, you may not. I find walking around the block a good way to cool off. Counting to ten has never done it for me, but you may try. *Both* of you. Thanks for killing the personal tension between you two, on this

Re: [ADMIN] Re: Pattern Match

2003-12-10 Thread Casey West
It was Wednesday, December 10, 2003 when Rob Dixon took the soap box, saying: : Casey West wrote: : : : Before I finally burst my cyanide capsule, may I.. ? : : No, you may not. : : I find walking around the block a good way to cool off. Counting to ten : has never done it for me, but you

RE: 1 doubt.

2003-12-10 Thread Ned Cunningham
It's a warning. If you turn it off you wont get it :) Ned Cunningham POS Systems Development Monro Muffler Brake 200 Holleder Parkway Rochester, NY 14615 (585) 647-6400 ext. 310 [EMAIL PROTECTED] -Original Message- From: Ajey Kulkarni [mailto:[EMAIL

2nd doubt.

2003-12-10 Thread Ajey Kulkarni
HI again. I'm tryign to modify the .procmailrc file Initially the file looks liek this -- :0: * ^X-Spam-Status: Yes | dmail +mail/junk :0: * ^X-Spam-Status: Yes | dmail +mail/junk :0: * ^X-Spam-Status: Yes | dmail +mail/junk :0: * ^X-Spam-Status: Yes | dmail +mail/junk :0: *

Re: pick N random lines from a file

2003-12-10 Thread Kevin Old
On Wed, 2003-12-10 at 11:12, David Garamond wrote: I'm trying to extend the Perl cookbook recipe on how to pick a random line from a file: #!/usr/bin/perl rand($.) 1 ($line = $_) while ; print $line; for picking up to N random lines from a file: start

RE: 2nd doubt.

2003-12-10 Thread Paul Kraus
Not to be a pest but try and be more descriptive in your subject. It saves everyone time in trying to decide on what they can help you with. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Pattern Match

2003-12-10 Thread Jenda Krynicky
From: Robert Brown [EMAIL PROTECTED] Casey West writes: : Does the regular expression mechanism in perl optimize regular : expressions such as the one you used earlier in this thread so that : the execution overhead is nearly as good as the C approach I outlined : earlier in this

Re: pick N random lines from a file

2003-12-10 Thread Robert Brown
Kevin Old writes: On Wed, 2003-12-10 at 11:12, David Garamond wrote: I'm trying to extend the Perl cookbook recipe on how to pick a random line from a file: #!/usr/bin/perl rand($.) 1 ($line = $_) while ; print $line; for picking up to N random lines from a

Re: Pattern Match

2003-12-10 Thread Robert Brown
On Wed, 10 Dec 2003 20:11:26 +0100, Jenda Krynicky [EMAIL PROTECTED] wrote: 1. Perl builtins and especialy the regular expression engine is heavily optimized. So it might very well be quicker to use a regexp from Perl than to implement the same stuff in C. Unless you spend a lot of

Re: file path pattern matching problem.

2003-12-10 Thread John W. Krahn
Ben Crane wrote: Hi all, Hello, I'm trying to split apart a filepath...e.g: c:\test\abc\what\somefile.txt The length of the filepath will never be constant... $ perl -le' use File::Spec; my $path = q[c:\test\abc\what\somefile.txt]; my ( $vol, $dir, $file ) = File::Spec-splitpath( $path

RE: file path pattern matching problem.

2003-12-10 Thread Tom Kinzer
Yes! And use Basename too. these will also give you the advantage of making your programs more portable! -Tom Kinzer -Original Message- From: John W. Krahn [mailto:[EMAIL PROTECTED] Sent: Wednesday, December 10, 2003 11:37 AM To: [EMAIL PROTECTED] Subject: Re: file path pattern

Match the first 3 characters of 2 words?

2003-12-10 Thread Rod
What is the easiest way to test the first 3 characters of two words for a match. IE: dasf test dasg to return positive. rod. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/ http://learn.perl.org/first-response

RE: Match the first 3 characters of 2 words?

2003-12-10 Thread Mark Anderson
Response at end of message... -Original Message- From: Rod [mailto:[EMAIL PROTECTED] Sent: Wednesday, December 10, 2003 12:19 PM To: '[EMAIL PROTECTED]' Subject: Match the first 3 characters of 2 words? What is the easiest way to test the first 3 characters of two words for a match.

Re: Match the first 3 characters of 2 words?

2003-12-10 Thread James Edward Gray II
On Dec 10, 2003, at 2:19 PM, Rod wrote: What is the easiest way to test the first 3 characters of two words for a match. IE: dasf test dasg to return positive. substr(dasf, 0, 3) eq substr(dasg, 0, 3) James -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

RE: Match the first 3 characters of 2 words?

2003-12-10 Thread Tom Kinzer
perldoc -f substr would be one way. easiest is a loaded word, depends on the context and the individual... -Tom Kinzer -Original Message- From: Rod [mailto:[EMAIL PROTECTED] Sent: Wednesday, December 10, 2003 12:19 PM To: '[EMAIL PROTECTED]' Subject: Match the first 3 characters of 2

RE: Match the first 3 characters of 2 words?

2003-12-10 Thread Bob Showalter
Rod wrote: What is the easiest way to test the first 3 characters of two words for a match. IE: dasf test dasg to return positive. substr($word1, 0, 3) eq substr($word2, 0, 3) -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: file path pattern matching problem.

2003-12-10 Thread B. Fongo
The best way to do it; is using the standard module File::Basename. For instance use File::Basename; # This should return somefile. $file_name = basename (c:\test\abc\what\somefile.txt); # This should also return c:\test\abc\what\ $dir_name = dir (c:\test\abc\what\somefile.txt); # fileparse

Problems forking -- fork DOSes my comp

2003-12-10 Thread Dan Anderson
I am learning about forks, so I tried the following code to make sure I had everything down: #! /usr/bin/perl use strict; use warnings; my $counter = 1; my $pid = 0; while ($counter 50) { if ($pid = fork) { open (FORKED, ./fork/$counter) or die(COULD NOT OPEN FORK); print

Problems forking -- fork DOSes my comp

2003-12-10 Thread Robert Brown
Dan Anderson writes: I am learning about forks, so I tried the following code to make sure I had everything down: #! /usr/bin/perl use strict; use warnings; my $counter = 1; my $pid = 0; while ($counter 50) { if ($pid = fork) { open (FORKED, ./fork/$counter)

Re: Problems forking -- fork DOSes my comp

2003-12-10 Thread James Edward Gray II
On Dec 10, 2003, at 3:52 PM, Dan Anderson wrote: I am learning about forks, so I tried the following code to make sure I had everything down: Still don't believe me about Network Programming with Perl, eh? Did I mention that it covers forking well? laughs Basic idea of fork: if ($pid =

Re: Problems forking -- fork DOSes my comp

2003-12-10 Thread Dan Anderson
On Wed, 2003-12-10 at 17:04, James Edward Gray II wrote: On Dec 10, 2003, at 3:52 PM, Dan Anderson wrote: I am learning about forks, so I tried the following code to make sure I had everything down: Still don't believe me about Network Programming with Perl, eh? Did I mention that it

Re: Problems forking -- fork DOSes my comp

2003-12-10 Thread david
Dan Anderson wrote: I am learning about forks, so I tried the following code to make sure I had everything down: #! /usr/bin/perl use strict; use warnings; my $counter = 1; my $pid = 0; while ($counter 50) { if ($pid = fork) { open (FORKED, ./fork/$counter) or

Re: First module!!! YAAAAY!!! :)

2003-12-10 Thread drieux
On Dec 10, 2003, at 4:39 AM, Ben Crane wrote: Just sat done and put together my FIRST MODULE congratulations. [..] I have been playing around with h2xs and getting really confused. If I understand this, the *.pm file is standalone and will work on pretty much any platform?? So if I write

Re: removing duplicate lines

2003-12-10 Thread R. Joseph Newton
Andrew Gaffney wrote: John W. Krahn wrote: Whenever you want unique values think hash. Well, it would have been weird to have a hash with keys named 'NET USE F: SKYLINE\\SKYLINEF\r\n'. No. It is not at all wierd to use hash for any of the puroses for which it is well-suited. Among of

Re: adding path to $PATH

2003-12-10 Thread drieux
On Dec 9, 2003, at 10:09 PM, Pablo Cusnir wrote: Is there a way using Perl to add to the environment variable PATH a new path, and that addition will be valid after the script is ran and not only for the script's scope. I'm working in cshell in Solaris 5.8 let me see IF I get your idea. I have a

-e with single quotes

2003-12-10 Thread Dan Muey
Hello group. I'm tryign to do a perl -e '' command and am wondering if it is possible to do single quotes inside the single quotes. IE perl -e 'print joe's mama;' Obvo=iously won't work perl -e 'print joe\'s mama;' And any other versions of \\' all fail. Is there a way to use a single quote

RE: -e with single quotes

2003-12-10 Thread Tom Kinzer
Guessing here but maybe you don't want to use *Perl's* escape, but instead use your *shell's* escape. Whatchu running from? -Tom Kinzer -Original Message- From: Dan Muey [mailto:[EMAIL PROTECTED] Sent: Wednesday, December 10, 2003 3:05 PM To: beginners Subject: -e with single quotes

Re: adding path to $PATH

2003-12-10 Thread Robert Brown
drieux writes: On Dec 9, 2003, at 10:09 PM, Pablo Cusnir wrote: Is there a way using Perl to add to the environment variable PATH a new path, and that addition will be valid after the script is ran and not only for the script's scope. I'm working in cshell in Solaris 5.8

RE: -e with single quotes

2003-12-10 Thread Tim Johnson
Hmmm, that's a tough one. Normally you can still escape a single quote inside single quotes, but maybe in this case it would be just easier to do a: C:\ perl print 'joe\'s mama'; ^Z (for windows anyway) -Original Message- From: Dan Muey [mailto:[EMAIL PROTECTED] Sent: Wednesday,

Re: -e with single quotes

2003-12-10 Thread Jenda Krynicky
From: Dan Muey [EMAIL PROTECTED] I'm tryign to do a perl -e '' command and am wondering if it is possible to do single quotes inside the single quotes. IE perl -e 'print joe's mama;' Obvo=iously won't work perl -e 'print joe\'s mama;' And any other versions of \\' all fail. Is there a

RE: adding path to $PATH

2003-12-10 Thread Tom Kinzer
in korn it would be: export PATH=$(add_path):$PATH -Original Message- From: Robert Brown [mailto:[EMAIL PROTECTED] Sent: Wednesday, December 10, 2003 3:20 PM To: drieux Cc: Perl Perl Subject: Re: adding path to $PATH drieux writes: On Dec 9, 2003, at 10:09 PM, Pablo Cusnir wrote:

Re: How do I set up bidirectional pipes over a network connection?

2003-12-10 Thread drieux
On Dec 10, 2003, at 5:54 AM, Dan Anderson wrote: [..] Actually, that's a good idea too. Thanks for your suggestions! -Dan while I like the NFS idea, you might want to look into the idea of a SAN/NAS device that is already hardened with fail over CPU's, etc, etc, etc... then as long as you keep

RE: -e with single quotes

2003-12-10 Thread Dan Muey
Guessing here but maybe you don't want to use *Perl's* escape, but instead use your *shell's* escape. Oh yeah, duh. I thought \ was my shell's escape character(bash) Whatchu running from? Nothing, just want to be able to use single quotes :) -Tom Kinzer -- To unsubscribe, e-mail:

Re: Recommendations?

2003-12-10 Thread R. Joseph Newton
Derek Brinson wrote: Where might I find reference (conceptual) stuff about how to launch a JAVA app via CGI (or vice versa)? Still working it out, but it appears that I may need to get some CGI variables into a JAVA App. Surely this is too difficult to be encapsulated in a website or two?

Re: -e with single quotes

2003-12-10 Thread Jeff Westman
Dan Muey [EMAIL PROTECTED] wrote: Hello group. I'm tryign to do a perl -e '' command and am wondering if it is possible to do single quotes inside the single quotes. IE perl -e 'print joe's mama;' Obvo=iously won't work perl -e 'print joe\'s mama;' And any other versions of \\' all

RE: -e with single quotes

2003-12-10 Thread Dan Muey
Dan Muey [EMAIL PROTECTED] wrote: Hello group. I'm tryign to do a perl -e '' command and am wondering if it is possible to do single quotes inside the single quotes. IE perl -e 'print joe's mama;' Obvo=iously won't work perl -e 'print joe\'s mama;' And any other versions

Re: -e with single quotes

2003-12-10 Thread perl-beginners
On Wed, Dec 10, 2003 at 05:05:26PM -0600, Dan Muey wrote: perl -e 'print joe's mama;' Obvo=iously won't work perl -e 'print joe\'s mama;' And any other versions of \\' all fail. As you were told, this is a question of your shell. If you are using a bourne shell (zsh, bash, ksh, etc...) try

Re: sorter script with *MANY* unique records

2003-12-10 Thread R. Joseph Newton
Robert Brown wrote: But how do they compare when the heash is too big to fit in main memory? If the has starts swapping, you loose! I do not know, however, whether using a database based hash would be faster or slower than the sort -u approach. It would make for an interesting test. Try

Re: sorter script with *MANY* unique records

2003-12-10 Thread Robert Brown
R. Joseph Newton writes: Most CPUs in use average about 99% idle time, at least on the computers [some running up to 20 open windows] on which I have checked these stats. To me, the more important issues in normal practice have to do with comprehensibility, and thus maintainability, than

splitting a string

2003-12-10 Thread Ravi Malghan
Hi: I want to split the string 0.0.0.0.1.10.1.30.1.10.1.30.1 into 4 variables: 0.0.0.0, 1, 10.1.30.1 and 10.1.30.1 any suggestions? TIA ravi __ Do you Yahoo!? New Yahoo! Photos - easier uploading and sharing. http://photos.yahoo.com/ -- To unsubscribe,

Re: sorter script [was: Frustrated newbie question]

2003-12-10 Thread drieux
On Dec 9, 2003, at 4:20 PM, R. Joseph Newton wrote: [..] To me hashes are like sausage to a carnivore--I love the end product, but have no desire to look too closely at the process. [..] first the last, the schwartzian transformation I included was from the perldoc -q sort as a way of noting

Re: splitting a string

2003-12-10 Thread drieux
On Dec 10, 2003, at 4:49 PM, Ravi Malghan wrote: Hi: I want to split the string 0.0.0.0.1.10.1.30.1.10.1.30.1 into 4 variables: 0.0.0.0, 1, 10.1.30.1 and 10.1.30.1 any suggestions? yes, get better data. a part of the problem you have is the that you could do this with a regEx my $input

RE: splitting a string

2003-12-10 Thread Wagner, David --- Senior Programmer Analyst --- WGO
Ravi Malghan wrote: Hi: I want to split the string 0.0.0.0.1.10.1.30.1.10.1.30.1 into 4 variables: 0.0.0.0, 1, 10.1.30.1 and 10.1.30.1 any suggestions? TIA ravi Here is one approach: #!perl -w use strict $_ = '0.0.0.0.1.10.1.30.1.10.1.30.1'; my @MyWorka = (); @MyWorka = split(/\./,

Re: Pattern Match

2003-12-10 Thread R. Joseph Newton
Robert Brown wrote: Casey West writes: Sorry again for my confusing way of expressing myself. Although I wrote my example in C, that was because I am a novice perl programmer, but an experienced C programmer, so I expressed my algorithm in C. The idea was to compare the execution

installing DBD::mysql

2003-12-10 Thread Ing. Carlos Alberto De Jesus Velasquez
Hi everybody: I´m trying to install DBD:mysql from CPAN and i get the next message Warning: prerequisite DBI failed to load: Can't locate DBI.pm in @INC (@INC contains: /usr/perl5/5.6 .1/lib/sun4-solaris-64int /usr/perl5/5.6.1/lib /usr/perl5/site_perl/5.6.1/sun4-solaris-64int

simple link checker...

2003-12-10 Thread simran
Hi All, Can someone suggest a really simple CPAN module that will validate links on a website. I need something like linklint - except that it needs to be on very very simple, and i'm sure there is a CPAN module out there i can use (i just can't seem to find a good one)... All i need to do

Re: sorter script with *MANY* unique records

2003-12-10 Thread drieux
On Dec 10, 2003, at 4:02 PM, R. Joseph Newton wrote: [..] Most CPUs in use average about 99% idle time, at least on the computers [some running up to 20 open windows] on which I have checked these stats. Not wishing to get us bogged down in a convention of the IEEE Transactions of Distributed

Re: Help needed on perl wrappers

2003-12-10 Thread R. Joseph Newton
Pandey Rajeev-A19514 wrote: Hi, I was interested in formatted display on screen. I can display ONE text paragraph in any part of the screen with Text::wrap. My question was how to adjust MANY such independent paragraphs in one screen (exactly in a newspaper format where you have 8-10

Re: dbmopen problem

2003-12-10 Thread Joel Newkirk
Well, I guess I'll reply since nobody else has... Problem is I still have no clue what's wrong here... :^) Surely somebody here can offer a hint? Please? :^) j On Mon, 2003-12-08 at 01:06, Joel Newkirk wrote: I've run into a problem. I have been working on a webmin module that, among

Re: First module!!! YAAAAY!!! :)

2003-12-10 Thread R. Joseph Newton
Ben Crane wrote: Hi all, Just sat done and put together my FIRST MODULE I went through an edited/modifyed text::parsewords and after lots of testing, editing and playing around with...I got it to work! I didn't realize it could be THIS easy! I have been playing around with h2xs and

Re: adding path to $PATH

2003-12-10 Thread drieux
On Dec 10, 2003, at 3:06 PM, drieux wrote: On Dec 9, 2003, at 10:09 PM, Pablo Cusnir wrote: Is there a way using Perl to add to the environment variable PATH a new path, and that addition will be valid after the script is ran and not only for the script's scope. I'm working in cshell in Solaris

Re: simple link checker...

2003-12-10 Thread david
Simran wrote: Hi All, Can someone suggest a really simple CPAN module that will validate links on a website. I need something like linklint - except that it needs to be on very very simple, and i'm sure there is a CPAN module out there i can use (i just can't seem to find a good one)...

RE: splitting a string

2003-12-10 Thread Tim Johnson
For those of you that are interested, I benchmarked a few of the suggestions. Drieux is by a significant margin the winner speed-wise. What I did was split the scalar into an array and then define the four variables by join()ing the result using an array slice instead of making a new array.

Re: Problems forking -- fork DOSes my comp

2003-12-10 Thread George Schlossnagle
On Dec 10, 2003, at 4:52 PM, Dan Anderson wrote: I am learning about forks, so I tried the following code to make sure I had everything down: #! /usr/bin/perl use strict; use warnings; my $counter = 1; my $pid = 0; while ($counter 50) { if ($pid = fork) { open (FORKED, ./fork/$counter)

  1   2   >