Re: 2 minutes and 8 second (how do i convert it to 02:08)??

2009-06-11 Thread Rob Coops
On Thu, Jun 11, 2009 at 10:51 AM, Michael Alipio wrote: > > Hi, > > I have a program that computes the number of elapsed minutes and seconds. > > > if the outputs are: > > 2 minutes, and 8 seconds. > > How do I print those two values to look like "Elapsed time: 02:08" > > Thanks! > > > > > -- > To

Re: How to pass info to a CGI program without using a form?

2009-08-24 Thread Rob Coops
On Sun, Aug 23, 2009 at 6:47 PM, boll wrote: > There is a perl program running on my server that delivers random images > to a web page. > The image on the html page is specified by this html code: > >http://localhost/cgi/random_image.cgi"/> > > I would like to use this program in several pl

Re: Taint mode & user supplied file names

2009-08-24 Thread Rob Coops
On Mon, Aug 24, 2009 at 2:17 PM, Tim Bowden wrote: > #!/usr/bin/perl -wT > use strict; > > my $filename = shift @ARGV; > > if (-f $filename){ > open OUT, "> $filename.new" or die "can't open $filename.new: $!"; > print OUT "are we safe?\n"; > close OUT; > } > > This dies with "Insecure dependen

Re: compressed data embedded in script

2009-10-05 Thread Rob Coops
On Mon, Oct 5, 2009 at 5:02 PM, Bryan R Harris wrote: > > > > I have about 60 MB of text data I want to include at the bottom of a > script. > > 60 MB is too big for us, but compressed it would be probably only 3-6 MB > which is much better. Is there any way to put gzipped data in the DATA > sect

Re: Need explanation about this code.

2009-10-09 Thread Rob Coops
On Fri, Oct 9, 2009 at 9:58 AM, Raheel Hassan wrote: > Thanks Jim for a nice reply, could you explain what > push(@$temp_table,$ref->[$i]); is doing. in the first code. > > In the second @_= $dbh where as in the if command $_ is getting the values > from this default array. Then how it can return

Re: Need some explanation about these lines.

2009-10-15 Thread Rob Coops
On Thu, Oct 15, 2009 at 2:55 PM, Raheel Hassan wrote: > Hi, > > I will be very thankful if someone explains under given code. > > #- CGI Module -- > use CGI; > > $q = CGI->new(); > > my ($myself) = split(/\?/,$q->self_url); #from where it will call the > url? >

How to set a proxy server.

2009-10-19 Thread Rob Coops
Dear list, I have the following bit of code: use strict; use warnings; use XML::Compile::WSDL11; use XML::Compile::SOAP11; use XML::Compile::Transport::SOAPHTTP; my $wsdl = XML::Compile::WSDL11->new('checkPort.wsdl'); my $checkVat = $wsdl->compileClient('checkVat'); my %request = ( countryCode

Re: fun programming problem

2009-11-10 Thread Rob Coops
On Tue, Nov 10, 2009 at 6:08 AM, Shawn H Corey wrote: > Matthew Sacks wrote: > > I am unabashedly posting a quiz question I have about regular > expressions: > > > > Looking for suggestions. > > > > I am thinking > > > > 1) make the set of regular expressions into one big expression? > > 2) search

Looking for advise on storring a complex array

2009-11-13 Thread Rob Coops
Dear list, I have a question to anyone who has experience with the following situation. I have a very complex array build from hashes containing arrays that contain hashes etc. I would like to store the whole thing on a disk, both to save on memory usage and to make it easier to separate this stru

Re: Extended Constructs

2009-11-16 Thread Rob Coops
On Mon, Nov 16, 2009 at 2:03 PM, Shubhangi < shubhangi_shing...@persistent.co.in> wrote: > Hi, > > Can anybody explain the extended constructs in regular expression with some > easy examples? > I searched about (?=..), (?:..) etc. I could find one liner description > (without examples). > I did no

Re: Looking for advise on storring a complex array

2009-11-18 Thread Rob Coops
On Mon, Nov 16, 2009 at 10:09 PM, Rene Schickbauer < rene.schickba...@magnapowertrain.com> wrote: > Rob Coops wrote: > >> Dear list, >> >> I have a question to anyone who has experience with the following >> situation. >> I have a very complex arra

Re: Re: Looking for advise on storring a complex array

2009-11-18 Thread Rob Coops
On Wed, Nov 18, 2009 at 1:53 PM, Jeff Pang wrote: > For SQLite, just perl -MCPAN -e 'install DBD::SQLite', then use the general > DBI to create and access SQLite database. > you even don't need to install SQLite binary program. > > On Nov 18, 2009, Dermot w

Re: Regular expressions question

2009-11-18 Thread Rob Coops
On Wed, Nov 18, 2009 at 5:05 PM, Thomas Bätzler wrote: > Hi, > > Dermot suggested: > > 2009/11/17 mangled...@yahoo.com : > > > > Can anyone tell me hoq to write a regular expression which matches > > > anything _except_ a litteral string ? > > > > > > For instance, I want to match any line which

Re: Out of Memory error with large Oracle DB extraction

2009-11-19 Thread Rob Coops
On Thu, Nov 19, 2009 at 9:07 AM, Dan Fish wrote: > I'm working on a project that requires some rather large extractions from > an > Oracle DB (about 2 million rows) and while monitoring the task manager, I > get an "Out of memory error" at about 2GB of mem usage. > > > > Client System Specifics:

Re: Regex to get last 3 digits of a number.

2009-11-23 Thread Rob Coops
On Mon, Nov 23, 2009 at 4:27 AM, shadow52 wrote: > Hey everyone, > > I am trying to get just the last 3 numbers from the following number > from perl using regexs but I have not had no success so I was hoping > that I could get a little help on this. I just ordered the regex book > from oreilly s

Re: how to write a debug-print sub with one argument?

2009-11-23 Thread Rob Coops
On Mon, Nov 23, 2009 at 8:36 AM, Mark_Galeck < mark_galeck_spam_mag...@yahoo.com> wrote: > Hello, I want to write a simple debug-print subroutine, which you > could call like this: > > $foobar = "foobar"; > dbgPrint foobar; > > and it would print the variable name and value. I came up with the >

Re: calc time elapsed in days

2009-11-27 Thread Rob Coops
On Fri, Nov 27, 2009 at 5:43 AM, raphael() wrote: > Hi, > > I have to code a script to calc time elapsed in days as to calc the rent to > be charged. > The person would write an object number and date in a text file like > > db.txt > OBJECT_NUM, DATE_GIVEN > > 2525,25.11.2008 > 2526,01.01.2009 >

Re: calc time elapsed in days

2009-11-27 Thread Rob Coops
On Fri, Nov 27, 2009 at 11:25 AM, Dermot wrote: > 2009/11/27 Rob Coops : > > On Fri, Nov 27, 2009 at 5:43 AM, raphael() > wrote: > >> > >> HOW CAN I COUNT ELAPSED DAYS ? > >> > >> I tried in localtime() days value like > >> >

Re: dcc chat example

2009-11-27 Thread Rob Coops
On Fri, Nov 27, 2009 at 11:26 AM, Kammen van, Marco, Springer SBM NL < marco.vankam...@springer.com> wrote: > Absolutely no'one with a example or hint in the right direction??? > > :-( > > - > Marco van Kammen > Springer Science+Business Media > System Manager & Postmaster > - > van Godewijckstraa

Re: speed test

2009-12-03 Thread Rob Coops
On Thu, Dec 3, 2009 at 1:19 PM, Orchid Fairy (兰花仙子) wrote: > Thanks all. > How about the files parsing with huge size (about 1T of each day)? > > The basic logic is: > > reach each line of every file (many files, each is gziped) > look for special info (like IP, request url, session_id, datetime

Re: Some Date Arithmetic/Manipulation help please !!!

2010-01-22 Thread Rob Coops
On Fri, Jan 22, 2010 at 11:09 AM, newbie01 wrote: > Hi all, > > Need some advise please on how do date arithmetic/calculation. > > Basically, I have a CSV delimited file that I need to do some date > calculations on. > > Am parsing the fields as $date1 and $date2 and I need to do the time > diffe

Re: help on a soap client

2010-03-29 Thread Rob Coops
On Mon, Mar 29, 2010 at 11:36 AM, Jeff Peng wrote: > Hello, > > I want to post some data to a webservice which is .NET powered. > > The webservice's developer tell me the request should be: > > POST /Service/IndicatorsService.asmx HTTP/1.1 > Host: 192.168.1.100 > Content-Type: text/xml; charset=u

Re: help on a soap client

2010-03-29 Thread Rob Coops
format they required for posting. > > Jeff. > > On Mon, Mar 29, 2010 at 5:49 PM, Rob Coops wrote: > > > > > > On Mon, Mar 29, 2010 at 11:36 AM, Jeff Peng > wrote: > >> > > -- > To unsubscribe, e-mail: beginners-unsubscr...@perl.org > For addition

Re: help on a soap client

2010-03-29 Thread Rob Coops
On Mon, Mar 29, 2010 at 12:16 PM, Rob Coops wrote: > > > On Mon, Mar 29, 2010 at 11:57 AM, Jeff Peng wrote: > >> Thanks Rob. >> I have enabled "trace => all" when new the object, so I have been able >> to look what was happened. >> I think wha

Re: help on a soap client

2010-03-29 Thread Rob Coops
On Mon, Mar 29, 2010 at 12:29 PM, Rob Coops wrote: > > > On Mon, Mar 29, 2010 at 12:16 PM, Rob Coops wrote: > >> >> >> On Mon, Mar 29, 2010 at 11:57 AM, Jeff Peng wrote: >> >>> Thanks Rob. >>> I have enabled "trace => all" whe

Re: Any Oracle DBA Around ???? - Perl DBI of Oracle Enterprise Manager (OEM) Install

2010-04-06 Thread Rob Coops
On Tue, Apr 6, 2010 at 2:06 PM, Shlomi Fish wrote: > Hi Chen, > > "newbie01 perl" has asked a question about Oracle and Perl 5/DBI. Would you > be > able to enlighten them? (Everyone should note that Chen is an Oracle DBA > and a > good friend of mine). Please hit reply all as the @perl.org maili

Re: about beginner perl site and developing skill

2010-04-06 Thread Rob Coops
On Tue, Apr 6, 2010 at 5:56 PM, Harry Putnam wrote: > [This message was inadvertently originally posted in a totally > inappropriate group, so reposted here where it was supposed to have > gone] > > Sorry that this is something of a ramble. > > I've been using perl for several yrs, only home scri

Re: Any Oracle DBA Around ???? - Perl DBI of Oracle Enterprise Manager (OEM) Install

2010-04-07 Thread Rob Coops
fail in case DBI cannot found do this. In this >> case, the script will fail at compile time. If you want to test whether >> DBI >> exists and if so use a fallback code, use something like (untested): >> >> {{{ >> eval { require DBI ; }; >

Re: String length limits?

2010-04-08 Thread Rob Coops
On Thu, Apr 8, 2010 at 2:26 PM, Chris Coggins wrote: > Is there a limit to the length of a string in perl? I'm combining about 200 > pieces of data into a single string and writing the string to a file and am > getting some weird behaviors every once in a while. Does perl have a limit > on the le

Re: How to install modules

2010-04-08 Thread Rob Coops
On Thu, Apr 8, 2010 at 2:14 PM, Jins Thomas wrote: > On Thu, Apr 8, 2010 at 5:31 PM, wrote: > > > > > > > > > Dear All > > > > I had a problem installing modules in office,why because in office we use > > proxy credentials to access internet.But i don't know how to do > it.So,please > > help me

Re: encrypted file

2010-04-08 Thread Rob Coops
On Thu, Apr 8, 2010 at 7:34 PM, Akhthar Parvez K wrote: > Hello, > > I'm gonna write a Perl script to enhance the security within an > application. This script would ideally checks the string passed to the > application with the data in the file and take actions appropriately. I > would like to en

Re: Meta: "Nice" Perl?

2010-04-22 Thread Rob Coops
On Thu, Apr 22, 2010 at 11:38 AM, HACKER Nora wrote: > Hi, > > I wonder if some of you are in the same situation like me: I am the only > Perl programmer in the company, at least trying hard to get along :-), > but I have nobody to ask for help. So I spend hours and hours with my > book and the i

Perl rounding errors?

2010-04-26 Thread Rob Coops
Hi list, I am just wondering if I sumbled upon an error in perl an error in my logic or somehtign else see the below perl one liners $ perl -e '$n = 0.945; $r = sprintf("%.2f", $n); print "$r\n";' 0.94 $ perl -e '$n = 0.9451; $r = sprintf("%.2f", $n); print "$r\n";' 0.95 $ perl -e '$n = 0.9450;

Re: Perl rounding errors?

2010-04-26 Thread Rob Coops
On Mon, Apr 26, 2010 at 3:57 PM, Shlomi Fish wrote: > On Monday 26 Apr 2010 14:05:16 Shlomi Fish wrote: > > Hi Rob, > > > > On Monday 26 Apr 2010 13:38:07 Rob Coops wrote: > > > Hi list, > > > > > > I am just wondering if I sumbled upon an error

Re: Perl rounding errors?

2010-04-27 Thread Rob Coops
On Mon, Apr 26, 2010 at 8:04 PM, John W. Krahn wrote: > Rob Coops wrote: > >> >> Thank you all that replied, in the end I copied the rules I learned in >> elementary school about how to round a number to two decimals. I'm sure it >> is a horrible hack and c

Re: Perl rounding errors?

2010-04-29 Thread Rob Coops
On Tue, Apr 27, 2010 at 9:16 AM, Uri Guttman wrote: > >>>>> "RC" == Rob Coops writes: > > RC> @Uri, returning 0 or 0.00 does make a small difference in that the > RC> receiving program likes the 0.00 better then the plain 0 don't ask > RC

Re: Array, foreach problem

2010-05-05 Thread Rob Coops
On Wed, May 5, 2010 at 10:18 AM, Shlomi Fish wrote: > Hi Paul, > > a few comments on your code - so you'll know how to write Perl better. > > On Wednesday 05 May 2010 02:52:03 Paul Fontenot wrote: > > Hi, > > > > I'm stuck on using an array to determine the out come of a foreach loop. > > The scr

Re: Array, foreach problem

2010-05-05 Thread Rob Coops
On Wed, May 5, 2010 at 7:21 PM, Akhthar Parvez K wrote: > On Wednesday 05 May 2010, Rob Coops wrote: > > Would it not be more efficient to reset the file handle to the star of > the > > file? > > > > use strict; > > use warnings; > > use Fcntl qw

Re: Array, foreach problem

2010-05-05 Thread Rob Coops
On Wed, May 5, 2010 at 8:50 PM, Akhthar Parvez K wrote: > On Wednesday 05 May 2010, Rob Coops wrote: > > > > A file never starts life being huge but certainly logs tend to grow, and > > they are not always kept in check properly so assume they will be massive > > (I&

Re: system vs. backticks

2010-05-19 Thread Rob Coops
On Tue, May 18, 2010 at 11:23 PM, Dr.Ruud > wrote: > pauldkl...@aol.com wrote: > >> I have a perl script that calls a compiled c program and retrieves the >> output lines hundreds of times a minute, and want to make it as >> efficient as possible. This is on Windows XP and ActivePerl 5.8. >> >>

beginners@perl.org

2010-05-24 Thread Rob Coops
On Mon, May 24, 2010 at 12:49 PM, Weizhong Dai wrote: > Hi guys, I met a problem. > When I tried this script below: > > // > sub print_instruction { > my ($disk, $start, $end) = @_; > print "Move disk #$disk from $start to $end.

Re: (un)defined troubles

2010-05-26 Thread Rob Coops
On Wed, May 26, 2010 at 1:06 PM, HACKER Nora wrote: > Hi, > > I am having troubles with a variable that should not be defined but > seems to be somehow. In the following code, the variable $localdir is > declared, then I am doing a find, and in case I get a result the > returned path is assigned

Re: Please explain the one string

2010-07-12 Thread Rob Coops
On Sun, Jul 11, 2010 at 10:45 PM, redtigra wrote: > Folks, > > would you please explain me one string of code I could node > understand? > Here it is: > $ perl -ne 'chomp; $fmt = "%-10s %-10s %s\n"; > > if ($ARGV eq "name") {$x{$_}++} > > elsif (/^ALTER TABLE (.*)/ and defin

Re: printf

2010-07-12 Thread Rob Coops
On Mon, Jul 12, 2010 at 12:54 PM, Shlomi Fish wrote: > On Monday 12 Jul 2010 11:07:49 newsense wrote: > > This is what i currently have but am not sure how i can use printf > > here instead of print so i can get some nice columns. > > > > #!/usr/bin/perl > > use warnings; > > use strict; > > > >

Re: need explanation

2010-07-16 Thread Rob Coops
On Fri, Jul 16, 2010 at 12:06 PM, Sharan Basappa wrote: > Thanks, Vishal. > > I was confused with usage {}. So you are saying that it will > dereference the array. > Isn't @$tableRef not enough in that case? > > Regards, > Sharan > > > On Fri, Jul 16, 2010 at 3:33 PM, Vishal Gupta > wrote: > > Hi

Re: Perl stat script ... ???

2010-07-18 Thread Rob Coops
On Mon, Jul 19, 2010 at 7:50 AM, newbie01 perl wrote: > Hi all, > > Does anyone know if someone had written a Perl stat script that mimics the > Linux' stat command? > > I want to be able to use the stat command on Solaris, unfortunately, I just > found out that that command is not available on So

Re: Compare file/dir size

2010-07-20 Thread Rob Coops
On Tue, Jul 20, 2010 at 1:51 PM, HACKER Nora wrote: > Hi, > > My aim is to compare two directories on different servers, whereas one > is the FTP'ed "copy" of the other, by checking whether both directories > are of exactly the same size. I tried to accomplish that with > Filesys::DiskUsage, but

Re: Calling Exit from within a subroutine

2010-07-21 Thread Rob Coops
On Wed, Jul 21, 2010 at 5:00 AM, Babale Fongo wrote: > I call several subroutines within my program. The program is design in a > way that I don't expect my subroutines to return to the caller but to exit > once they have executed. > > At the moment I don't have exit or return at the end of my s

Re: Extract data from BEncoded .torrent files

2010-07-26 Thread Rob Coops
On Sun, Jul 25, 2010 at 9:24 PM, NisargaYoga wrote: > Hi - Total newbie and my first post so please tell me if I'm doing > anything wrong. > > My first real Perl project - looking for some conceptual guidance. > > The project involves processing of BEncoded .torrent files downloaded > from an rtor

Re: hash arrays

2010-07-26 Thread Rob Coops
On Mon, Jul 26, 2010 at 2:09 PM, Sharan Basappa wrote: > Folks, > > I am reusing a code for some enhancements. According to my > understanding, it is a record with > some unique string as key and then hash array as the value. > > I iterate through the array and print as follows: > > foreach my $ke

Re: add newline

2010-08-03 Thread Rob Coops
On Tue, Aug 3, 2010 at 12:26 PM, Sharan Basappa wrote: > In my program, I am building a text file f that also contains newlines > irst into an array. > I push every line to the array, but how do I add new lines to this text? > > Regards, > Sharan > > -- > To unsubscribe, e-mail: beginners-unsubscr

Re: Can't call method "get_value....

2010-08-05 Thread Rob Coops
On Thu, Aug 5, 2010 at 9:52 AM, sync wrote: > Hi, guys: > > i have a perl script that supposed to add users to ldap . when i run the > script it get: > > Can't call method "get_value" on an undefined value at ./add_user.pl > > > > Any help will be appreciated? > > > The following message is my

Re: Install CPAN module in shared hosting

2008-03-28 Thread Rob Coops
available but if so be prepared for your provider to refuse installing it. Regards, Rob Coops On Fri, Mar 28, 2008 at 4:23 PM, anthony brooke <[EMAIL PROTECTED]> wrote: > Hello, > > I like to install CPAN modulike like AI::Prolog, I have the Cpanel that > have CPAN module instal

Re: Uninitialized value in pattern match

2008-03-31 Thread Rob Coops
only attempt to match the value if it is defined (a value assigned to that part of the array. Regards, Rob Coops On Mon, Mar 31, 2008 at 3:17 PM, Johan <[EMAIL PROTECTED]> wrote: > The last line of this code > foreach $PkgFile( @$PkgList ) > { >if( $PkgFile =~m/^\s*$/)

Re: week in a year

2008-04-02 Thread Rob Coops
If you are calculating it your self and assuming you are intrested in the ISO defenition of the week number: http://www.proesite.com/timex/wkcalc.htm Of course there are modules on CPAN that do the same but then again, if all you want to know is the number of the week it might be simpler to calcul

Re: Perl-GD module installation

2008-04-23 Thread Rob Coops
GD.xs:7:16: gd.h: No such file or directory GD.xs:8:21: gdfontg.h: No such file or directory GD.xs:9:21: gdfontl.h: No such file or directory GD.xs:10:22: gdfontmb.h: No such file or directory GD.xs:11:21: gdfonts.h: No such file or directory GD.xs:12:21: gdfontt.h: No such file or directory It loo

Re: Perl-GD module installation

2008-05-07 Thread Rob Coops
I would say this is the problem: */usr/bin/ld: cannot find -lfreetype* At least that is what the compiler says the problem is and I guess it knows better then I do. So time to install the freetype libs. ( http://www.freetype.org/) On Wed, May 7, 2008 at 9:05 AM, sivasakthi <[EMAIL PROTECTED]> w

Re: Perl-GD module installation

2008-05-07 Thread Rob Coops
kely turn to this same list asking the same questions as you are. Regards, Rob On Wed, May 7, 2008 at 10:45 AM, sivasakthi <[EMAIL PROTECTED]> wrote: > > On Wed, 2008-05-07 at 09:31 +0200, Rob Coops wrote: > > I would say this is the problem: > > */usr/bin/ld: cannot find

Re: perl 5.8.8 installation

2008-05-13 Thread Rob Coops
its monitoring down. I do not fully agree with that way of working but in a company with +100k people these kinds of things usually are not up to the people that actually work with the software to decide. Regards, Rob Coops On Tue, May 13, 2008 at 11:42 AM, Eko Budiharto <[EMAIL PROTECTED]>

Re: perl and web

2008-05-14 Thread Rob Coops
small layout change on the website can break your scrapping module. But I assume that you figured that one out already. Regards, Rob Coops On Wed, May 14, 2008 at 6:05 PM, Richard Lee <[EMAIL PROTECTED]> wrote: > Hi guys again! > > I am sure this questions been around for while bu

Re: what is ^M at the end of a line?

2008-05-21 Thread Rob Coops
ay, if you want to do it in perl then you will most likely have to use a regex because not all moachines will have the dos2unix applicaiton available. Regards, Rob Coops On Wed, May 21, 2008 at 10:45 AM, Remy Guo <[EMAIL PROTECTED]> wrote: > hi all, > i have a text processing scrip

Re: First perl program

2008-06-19 Thread Rob Coops
users, and verify that what they put in is actually a number and not a bit of text or something like that, but as you say this is just a program to start to learn so it might be a bit overkill to check your own input. Regards, Rob Coops On Thu, Jun 19, 2008 at 8:55 AM, Jason B <[EMAIL PROTECTED]&g

Re: problem with Mime::Lite

2008-06-19 Thread Rob Coops
I believe that that can be done by filling the reply-to variable of Mime::Lite this should make the mail server send any reply to the email address specified there. I never tested that so I am not making any promisses but it should work as far as I recall... On Thu, Jun 19, 2008 at 10:51 AM, Malk

Re: Define NULL value in Perl

2008-07-14 Thread Rob Coops
*Randal wrote:* *Perl doesn't have NULL. That'd be like saying "how do I make this pig fly?". It's a nonsense question. * I think this is a little to easy, perl does have a value that indicates that a variable does not have any set value it is called: undef In many other langueages like Java, Vis

Re: regular expression to exclude a phrase

2008-07-21 Thread Rob Coops
You could simply say this: if ( ! m/ab/ ) { #make the world go round } Or assuming you are looping thru a list you could say something like: foreach my $item ( @list ) { next if ( $item =~ m/ab/ ); #make the world go round } I personaly like the second one better because of the readability but

Re: regular expression to exclude a phrase

2008-07-21 Thread Rob Coops
7;t be arsed with my manager looking over my sholder wondering why his report isn't finished :-) Regards, Rob On Mon, Jul 21, 2008 at 12:36 PM, Octavian Rasnita <[EMAIL PROTECTED]> wrote: > From: "Rob Coops" <[EMAIL PROTECTED]> > > You could simply say this

Re: can perl program do this?

2008-07-31 Thread Rob Coops
If you can make Net::Pcap connect to a remote server things will work fine, I am not sure about using Net::Pcap to do this as I never used it and from the description it seems to be a packet capture lib not so much a communication one, but as I said if you can make it reach out and talk to the othe

Re: can perl program do this?

2008-07-31 Thread Rob Coops
TED]> wrote: > Rob Coops wrote: > >> If you can make Net::Pcap connect to a remote server things will work >> fine, I am not sure about using Net::Pcap to do this as I never used it and >> from the description it seems to be a packet capture lib not so much a >> com

Re: regular expression problem

2008-08-02 Thread Rob Coops
Try looking up the 'g' modifier for regular expressions. http://perldoc.perl.org/perlre.html On Fri, Aug 1, 2008 at 10:28 AM, <[EMAIL PROTECTED]> wrote: > I'm trying to substitute all comma separated numbers in a text file > with the same numbers without commas. This expression will match the >

Re: Newbie - Simple conditional on regexp match

2008-08-06 Thread Rob Coops
You are almost right, since it prints all lines all lines match. Could you explain what it is that you are trying to match, that way people might be able to help getting the regex right. The way you are looking at the file line by line is valid and if your regex matches only a few lines it will o

Re: sub alias name

2008-08-27 Thread Rob Coops
Of course you can... sub really_long_function_name_i_do_not_like_to_type {return 'data';} sub short_func { return really_long_function_name_i_do_not_like_to_type(); } Should do the trick, Rob On Wed, Aug 27, 2008 at 8:44 PM, Ryan <[EMAIL PROTECTED]> wrote: > given: > > sub really_long_functio

Re: Get the last entry of log file

2008-09-17 Thread Rob Coops
m/([0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3})/ Should do the trick I guess of course there are fancier ways but this will do the trick... Regards, Rob On Wed, Sep 17, 2008 at 12:11 PM, Manasi Bopardikar < [EMAIL PROTECTED]> wrote: > I have a log file- > > | 15 Sep 2008 - 06:37 | TWiki

Re: Get the last entry of log file

2008-09-17 Thread Rob Coops
my $last_line; while( <> ){ $last_line = $_; } Sure... depends on the size of the log, though. Do that for a log that is say 500MB in size and you are in for quite a wait as it will loop over each line in the file will it not? On Wed, Sep 17, 2008 at 1:46 PM, Mr. Shawn H. Corey <[EMAIL PROTECTED

Re: Regular Expression Question

2008-09-22 Thread Rob Coops
You are almost there but not quite... $string =~ s/\~(.*)\~/$1<\/i>/g; Should do the trick. All I do is capture the "someString" part and rewrite it (it is stored in $1 for the first capture and $2 for the second and so on..) This way ~anystring~ will be replaced with anyString There is one more

Re: Regular Expression Question

2008-09-22 Thread Rob Coops
On Mon, Sep 22, 2008 at 2:48 PM, Jack Gates <[EMAIL PROTECTED]> wrote: > On Monday 22 September 2008 08:42:51 am Mr. Shawn H. Corey wrote: > > On Mon, 2008-09-22 at 08:31 -0400, Jack Gates wrote: > > > Would you want to come along later and have to scroll to the bottom to > > > read > > > the firs

Re: Sending SMS

2008-09-22 Thread Rob Coops
On Mon, Sep 22, 2008 at 5:01 PM, Pat Rice <[EMAIL PROTECTED]> wrote: > Hi all > I'm just wondering whats the best way to send an SMS thought perl ? > Has any one experience of doing such a task ? > > I'm looking at CPAN and finding: > SMS-Send > Net-SMS > > any recommendations ? > also and ideas a

How to make part of regex optional.

2008-09-24 Thread Rob Coops
Hi all, I am having some trouble matching the following string: "Some text+...:...:...:...:...+some more text" The trick is there are two dilimiters in this string the + and the : are used to separate the string, the + signifies a part of the string ended and the : signifies a sub part of the st

Re: Internet explorer viewing options, run script but was prompted to download

2008-09-27 Thread Rob Coops
On Sun, Sep 28, 2008 at 8:28 AM, itshardtogetone < [EMAIL PROTECTED]> wrote: > Hi, > I use internet explorer 7.0 to browse the website. > I upload a simple script, helloworld.cgi, to my website but when I ran the > script by typing the url, www.myurl.com/cgi-bin/helloworld.cgi, instead of > execut

Re: Regexp: Correct braces

2008-10-03 Thread Rob Coops
On Fri, Oct 3, 2008 at 11:15 AM, Vyacheslav Karamov <[EMAIL PROTECTED]>wrote: > Rob Coops пишет: > >> Try this: >> (?:Some text not captured) >> The ?: at the beginning tels perl that even though you want it to see >> thsi whole group you would not like per

Re: certification for perl

2008-10-06 Thread Rob Coops
On Mon, Oct 6, 2008 at 2:16 PM, Praveena Vittal <[EMAIL PROTECTED]>wrote: > Hi All, > > I like to do some certification in perl,but i could not get any information > about the available certifications in perl . > > Could anyone help me in this? > > Thanks, > Praveena > Oh, boy that is a can of w

Re: Bug in Perl

2008-10-07 Thread Rob Coops
On Tue, Oct 7, 2008 at 2:45 PM, <[EMAIL PROTECTED]> wrote: > Hi All, i found this as a Bug in Perl > > consider >for($i=0;$i<0.4;$i=$i+0.1) > { >print "$i\n"; >} > > > here you wiil get output as expected... > 0 to 0.3 > it work fine till test is $i<0.7...UPTO HERE EV

Re: Regarding reg. exp.

2008-10-13 Thread Rob Coops
On Mon, Oct 13, 2008 at 2:49 PM, <[EMAIL PROTECTED]> wrote: > > Hi All, > > > > I have a string and I need to parse that string to check whether it is > in required format or not. I have a Perl script which ask for user > input. I have mentioned in the Perl script that input should be in the > fol

Re: Check the DB-handle status.

2008-10-13 Thread Rob Coops
On Mon, Oct 13, 2008 at 10:29 AM, Deviloper <[EMAIL PROTECTED]> wrote: > Hi there, > > in the early days of the dbi-modul there was a function $dbh->ping(). > nearly no driver ever implemented it. > > I want to check the status of my db, in my daemon on a regular base. > I could not find any stand

Log::Log4perl

2008-10-15 Thread Rob Coops
Hi all, I am a little stumped here, I have a nice little application that makes use of Log4perl (which I really like a lot) and now that all the basic functionality is in there I have started working on makking things go a little faster. One of the things is optimizing the way data is fetched (all

Re: Log::Log4perl

2008-10-15 Thread Rob Coops
On Wed, Oct 15, 2008 at 9:47 PM, Chas. Owens <[EMAIL PROTECTED]> wrote: > On Wed, Oct 15, 2008 at 06:04, Rob Coops <[EMAIL PROTECTED]> wrote: > > Hi all, > > > > I am a little stumped here, I have a nice little application that makes > use > > of Log4per

Re: How to list all used modules?

2008-10-16 Thread Rob Coops
On Thu, Oct 16, 2008 at 6:06 AM, howa <[EMAIL PROTECTED]> wrote: > > Hello, > > Conside I have the code: > > use LWP::UserAgent (); > use Apache::DBI (); > use DBI (); > ... > ... > > Some points later, I want to list all the used modules, is it > possible? > > E.g. Print out > > LWP::UserAgent >

Re: Conditional replace

2008-10-22 Thread Rob Coops
On Wed, Oct 22, 2008 at 3:38 PM, Brian <[EMAIL PROTECTED]> wrote: > Hi > > ARGV0 will = AB7Z001 > ARGV1 will = AB7Z002 > ARGV2 will = 01/01/1900 > > I would like to read a file, locate AB7Z001 (but not AB7Z0011, so a space > at position 8 in string ) > Upon location of value in argv0 replace it w

Re: match and putting in a variable with a single statement

2008-10-24 Thread Rob Coops
On Fri, Oct 24, 2008 at 5:00 PM, Sharan Basappa <[EMAIL PROTECTED]>wrote: > Hi, > > I was just trying to match a string and save it in a single statement > as follows: > > $extracted = "cp xyz"; > $state_var = $extracted =~ m/cp\s+(.*)/; > print "$state_var $1 \n"; > > The output is: 1 xyz > > So

beginners@perl.org

2008-10-30 Thread Rob Coops
On Thu, Oct 30, 2008 at 10:56 AM, Brent Clark <[EMAIL PROTECTED]>wrote: > Hiya > > I have three sentences. > > This is a nice hotel. > The view & food is good. > We are at the Victoria & Alfred Hotel. > > I need a perl regex / code to not print out sentence 2 (basically fail). > > This is what I s

Re: Reg : Browser Back Button

2008-11-03 Thread Rob Coops
On Mon, Nov 3, 2008 at 11:10 AM, Anusha Krishna chand < [EMAIL PROTECTED]> wrote: > Hi All, >Is it possible to perform some action when we click on back button > of the browser. I need to call a script when i click on back button of the > browser using perl script... > Is there any brows

Re: substitute multiple spaces with just one

2008-11-04 Thread Rob Coops
On Tue, Nov 4, 2008 at 4:35 PM, Sharan Basappa <[EMAIL PROTECTED]>wrote: > > You are completely right. :-) > > > > What you want to be doing is this: $temp =~ s/\s+/ /g; > > The reason for that is simple, \s is used to match a space or multiple > > spaces, it is not used to print a space that is a

Re: substitute multiple spaces with just one

2008-11-04 Thread Rob Coops
On Tue, Nov 4, 2008 at 4:21 PM, Sharan Basappa <[EMAIL PROTECTED]>wrote: > Hi, > > I have string that has one or more spaces. I would like to replace > them with a single space. > The simple code below replaces the spaces fine, but does not > substitute with a space. > > $temp = "0 1 2 34";

Re: Help with Split

2008-11-04 Thread Rob Coops
On Tue, Nov 4, 2008 at 6:12 AM, <[EMAIL PROTECTED]> wrote: > I have a string: " Confirming: yes Supplier > Telephone: 213-923-0392" > > I want to split the string so that i can capture yes in $conf and > 213-923-0392 in $tele. > > TIA for all the help, > > -ss > > > -- > To unsub

Re: Help with Split

2008-11-05 Thread Rob Coops
On Wed, Nov 5, 2008 at 2:45 AM, <[EMAIL PROTECTED]> wrote: > On Nov 4, 5:16 am, [EMAIL PROTECTED] (Peter Scott) wrote: > > On Mon, 03 Nov 2008 21:12:40 -0800, sanju.shah wrote: > > > I have a string: " Confirming: yes Supplier > > > Telephone: 213-923-0392" > > > > > I want to sp

Re: hash slice??

2008-11-10 Thread Rob Coops
On Mon, Nov 10, 2008 at 3:52 PM, Travis Thornhill <[EMAIL PROTECTED] > wrote: > Is there such a thing? > > I'm trying to take a HoH and make a reference to a sub-part of the hash. > > This doesn't work: > > my %sub_hash = $main_hash{'sub_hash'}; > > I get the following error: > Reference found whe

Re: email validation

2008-11-10 Thread Rob Coops
On Mon, Nov 10, 2008 at 11:55 AM, Anusha Krishna chand < [EMAIL PROTECTED]> wrote: > Hi All, > How to validate an email id using perl regular expression . > First of all it would be nice to see what you tried so far with out that it seems like you are simply using thsi mailing list

Re: problem with simple perl Regular Expression match

2008-11-11 Thread Rob Coops
On Tue, Nov 11, 2008 at 5:03 PM, JC Janos <[EMAIL PROTECTED]> wrote: > When I run this script, > >$result = `$WGET $file`; >print $result . "\n"; >if ( $result =~ m/saved/ ){ >print "MATCH\n"; >} else { >print "NO MATCH\n"; >} > > It

Re: Regular expression problem

2008-11-18 Thread Rob Coops
On Tue, Nov 18, 2008 at 9:52 AM, howa <[EMAIL PROTECTED]> wrote: > Hello, > > I have two strings: > > 1. abc > 2. abc& > > > The line of string might end with "&" or not, so I use the expression: > > (.*)[$&] > > > Why it didn't work out? > > > Thanks. > > > -- > To unsubscribe, e-mail: [EMAIL PRO

Re: perl version for windows

2008-11-23 Thread Rob Coops
On Sun, Nov 23, 2008 at 6:58 PM, David Ehresmann <[EMAIL PROTECTED]>wrote: > If I want to install perl for the computer described below: > > > Windows Vista Home Premium > > Service Pack 1 > > Intel Pentium Dual CPU E2200 2.2GHz 2GB memory > > 32-bit > > > > I would go to ActivePerl and download

Re: perl version for windows

2008-11-23 Thread Rob Coops
On Sun, Nov 23, 2008 at 7:31 PM, Rob Dixon <[EMAIL PROTECTED]> wrote: > Rob Coops wrote: > >> > >> What is the difference between learning perl on windows vs. unix? > > > > The main difficulty you will run into is the fact that most examples and > so >

  1   2   3   >