Re: Decoding Regular Expression

Shilpa Arvind [SA], on Tuesday, June 28, 2005 at 12:12 (-0700) wrote: SA> What does \" do. (Quotes) " does not require blackslash but here it is used SA> with blackslash. What does this do. regular expression should be written as '\"' or '"'. In this case (" is not a special character), should be

Decoding Regular Expression

Hi, I am having trouble understanding this regular expression. Any help on this is greatly appreciated. open FILE, "xyz"; while () { undef($regexp_var); ($regexp_var) = ($_ =~ /(\"(\\\"|[^\"])+

RE: Run a subroutine, then replace subroutine and run again

Wagner, David --- Senior Programmer Analyst --- WGO wrote: > Dave Gray wrote: >> On 6/27/05, Wagner, David --- Senior Programmer Analyst --- WGO >> <[EMAIL PROTECTED]> wrote: >>> Sorry, but I have two subroutines with the same name which >>> is fine because I have not had a need to use the

RE: Run a subroutine, then replace subroutine and run again

Dave Gray wrote: > On 6/27/05, Wagner, David --- Senior Programmer Analyst --- WGO > <[EMAIL PROTECTED]> wrote: >> Sorry, but I have two subroutines with the same name which >> is fine because I have not had a need to use the hashes which these >> two similar subroutines created. >> >>

Re: Better place for OOPerl questions?

Scott R. Godin wrote: > Noting that this list is more oriented towards beginner > questions/general inquiry, but not having found a perl.org list more > geared towards advanced and/or OOPerl questions, I'm wondering: > > A> whether starting a perl.org oop list makes any sense? It might, but it mi

Re: Better place for OOPerl questions?

On 6/27/05, Scott R. Godin <[EMAIL PROTECTED]> wrote: > Noting that this list is more oriented towards beginner > questions/general inquiry, but not having found a perl.org list more > geared towards advanced and/or OOPerl questions, I'm wondering: > > A> whether starting a perl.org oop list makes

Re: reg exp help

On 6/28/05, Jay Savage <[EMAIL PROTECTED]> wrote: > On 6/28/05, Jeff 'japhy' Pinyan <[EMAIL PROTECTED]> wrote: > > On Jun 28, [EMAIL PROTECTED] said: > > > > > but here is another piece of code I tried and this worked as well > > > considering the attachment: > > > > > > comments on the below block

Re: reg exp help

On 6/28/05, Jeff 'japhy' Pinyan <[EMAIL PROTECTED]> wrote: > On Jun 28, [EMAIL PROTECTED] said: > > > but here is another piece of code I tried and this worked as well > > considering the attachment: > > > > comments on the below block? > [snip] > > if (m/begin pgp public key block/ig) { > > $lc

Re: perl message passing module

Manish Sapariya wrote: > Hi List, > Am looking for some messaging module, using which I can > pass message between, perl programs. Looked at search CPAN, > and found ebXML. Any comments on ebXML, or any other messaging > module will be of great help. > > Thanks, > Manish > Messaging how? This s

RE: Run a subroutine, then replace subroutine and run again

Jeff 'japhy' Pinyan wrote: > On Jun 27, Wagner, David --- Senior Programmer Analyst --- WGO said: > >> Sorry, but I have two subroutines with the same name which is fine >> because I have not had a need to use the hashes which these two >> similar subroutines created. >> >> How do I run the subr

Re: RE:Wrapper Script

- Original Message - From: "Larsen, Errin M HMMA/Information Technology Department" <[EMAIL PROTECTED]> Date: Tuesday, June 28, 2005 11:25 am Subject: RE:Wrapper Script > Hi Perl folks, Hello Errin > > No one replied to my posts about a wrapper script. I'm going to try > again. > >

Local and global variables

Can someone explain the difference between use vars qw/$defined_by_vars/ ; our $defined_by_our ; $not_explicily_defined = 1 ; Are these all global to the package they are defined it. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Wrapper Script

> exec '/bin/original-print-something', @processed_args or die "Couldn't > exec /bin/original-print-something: $!"; > > > > My problems come when I get a command-line like this: > # cat /etc/hosts | /bin/print-something -a -b some-option -c > someother-option > > In this case, my LOG file

RE: Emptying Arrays

>for my $host (@hosts) { > my %freq; > > $freq{$_}++ for grep /$host/i, @logfile; > > # open file > for (sort keys %freq) { >print "$_: $freq{$_}\n"; > } > # close file >} > > Voila. I noticed that you use the default '$_'; as a matter of style/pro

Re: reg exp help

On Jun 28, [EMAIL PROTECTED] said: but here is another piece of code I tried and this worked as well considering the attachment: comments on the below block? [snip] if (m/begin pgp public key block/ig) { $lc=1; } if ( $lc==1){ print $_; } if (m/end pgp public key block/ig) { $lc=0; }

RE:Wrapper Script

Hi Perl folks, No one replied to my posts about a wrapper script. I'm going to try again. I want to be able to process some command-line options, then call/exec a separate command with my processed options, AND pass along the piped input to that command as well. For example, if I have a c

Re: Emptying Arrays

On Jun 28, Ryan Frantz said: I'm working on a script that iterates over a log file looking for known hosts so that their messages can be grouped in a summary report. However, when I run the script, the array I create includes entries for previous hosts that were found. I thought that I could em

Re: reg exp help

On 6/28/05, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: > Actually, > > you are incorrect... The +>> mean read and write in append mode. Please > see the follow up email with the attachment I sent. > > Derek B. Smith > OhioHealth IT > UNIX / TSM / EDM Teams > 614-566-4145 While you are correct

Re: reg exp help

On Jun 28, [EMAIL PROTECTED] said: for (;;) { if (/^-{5,}(\w+)/ig) { print $_; } $lc++; } I want to print everything from BEGIN TO END and right now all I am printing is the begin and end lines. If that's what you want, you should use two regexes with the .. operator: while ()

Emptying Arrays

Perlers, I'm working on a script that iterates over a log file looking for known hosts so that their messages can be grouped in a summary report. However, when I run the script, the array I create includes entries for previous hosts that were found. I thought that I could empty the array at the b

Re: reg exp help

On 6/28/05, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: > Can anyone help me with this match: [snip] > for (;;) > { > if (/^-{5,}(\w+)/ig) { > print $_; > > } >

Re: reg exp help

Actually, you are incorrect... The +>> mean read and write in append mode. Please see the follow up email with the attachment I sent. Derek B. Smith OhioHealth IT UNIX / TSM / EDM Teams 614-566-4145 brigh

Re: reg exp help

Hello, First of all you're opening the file for writing Second i didn't understand what you really want , if you want to print out everything inside the file my $file = 'newfile.txt'; open(FILE,$file); while(){ print $_;} close(FILE); That's it with out matching or anything bye On 6/2

Re: Run a subroutine, then replace subroutine and run again

On 6/27/05, Wagner, David --- Senior Programmer Analyst --- WGO <[EMAIL PROTECTED]> wrote: > Sorry, but I have two subroutines with the same name which is fine > because I have not had a need to use the hashes which these two similar > subroutines created. > > How do I run the su

reg exp help

Can anyone help me with this match: #!/usr/bin/perl use strict; use warnings; my $talxkeylog =qq(/home/gpghrp/.gnupg/keys/log/talxkeyupd.log); open (FH, "+>>$talxkeylog") or warn "unable to open file $talxkeylog $!" ; #&cURL(); #print "$calcdate\n$curtdate"; my (

Re: deleting ldap users question

Morning all, I have made changes to that ldap script and when I tried to delete a user I got "subtree delete not supported". I want to delete everything associated with a user, is there a way that I can delete everything with just the user id ? Cheers for any advice folks. G :) From: Dav

perl message passing module

Hi List, Am looking for some messaging module, using which I can pass message between, perl programs. Looked at search CPAN, and found ebXML. Any comments on ebXML, or any other messaging module will be of great help. Thanks, Manish -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional com

Re: perl and gnuplot

zentara highstream.net> writes: > Why don't you try writing the gnuplot output to a temporary file, and > send that file, then delete it. That way you can get it to work for > sure. I still haven't figured out the problem with the plus symbols. However, I did find a way around the problem by wri