Re: Browser Properties

no actaully, suppose there is a site..at the end of the day I need to get a statistics like how many users have used...Internet Explorer...how many Netscape...How many otheres. I think there should be some module which tells abt browser properties.. Anish - Original Message - From:

Re: Simple if conditional

Another suggestion is to perhaps assign your values prior to testing as well. XML parsers can create a pretty convoluted data structure. assign the value your looking for. warn the value prior to the conditional logic and see if your logic operates correctly. # add me before your conditional blo

RE: Simple if conditional

Kevin Old <[EMAIL PROTECTED]> wrote: : Hello everyone, : : I have an if statement that has three different clauses that : need to be met before it should be executed, and for some : reason I can't get the conditionals to work. Here's the snip : of code: Start smaller, with something you kn

RE: Spam:Re: Autmatic function creation

G'day... > > : Should I be using "my" or "our" here for the variables - these > > : are the variables I want present in all my derived classes and > > : should be the same for all. > > I assume you're referring to things like > %InheritableClassData... You should be using "our" variables; > "my

HTML processing Tokens / LWP::Simple

Hi All, I need to scrape some text out of an HTML document. I'm not sure what Module to use. I guessing HTML::TokeParser --- here is what I need to scrape --- 1.Each two-ply coreless bath tissue roll provides three times the sheet count of standard 2-ply tissue. Replaces item 19377/0

Re: Simple if conditional

Kevin Old wrote: Can someone tell me what I'm doing wrong? Redundant whitespace? -- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Simple if conditional

On Wed, 17 Nov 2004 15:59:54 -0600, Dave Kettmann <[EMAIL PROTECTED]> wrote: > > > > Hello everyone, > > > > I have an if statement that has three different clauses that need to > > be met before it should be executed, and for some reason I can't get > > the conditionals to work. Here's the snip

Re: Autmatic function creation

On Wed, Nov 17, 2004 at 11:00:17AM -0500, Dave Gray wrote: > Charles K. Clarkson <[EMAIL PROTECTED]> wrote: > > [snip] > > : : foreach my $method ( keys %InheritableClassData ) { > > : : no strict 'refs'; > > : : *$method = sub { > > : : shift; > > : : $InheritableClassData{

RE: Simple if conditional

> Hello everyone, > > I have an if statement that has three different clauses that need to > be met before it should be executed, and for some reason I can't get > the conditionals to work. Here's the snip of code: > > print "STCode: > ",$activity->child("Status")->child("StatusType")->child("C

Simple if conditional

Hello everyone, I have an if statement that has three different clauses that need to be met before it should be executed, and for some reason I can't get the conditionals to work. Here's the snip of code: print "STCode: ",$activity->child("Status")->child("StatusType")->child("Code")->value,"\n

Re: using printf on specified fields of record

On Wednesday 17 November 2004 09:52, Bob Showalter wrote: > Joseph Paish wrote: > > following is a sample of a record generated by a perl script i have > > written ( i have put each field on a separate line in this email to > > prevent word-wrapping) : > > > > > > 12/05/2003 > > sold > > 8000 > > w

Re: Question on chat message

[EMAIL PROTECTED] wrote: Hi Hi, please don;'t top post :) The reasoned I am using 2 message because both message are different. Both can be printed same time. Assigning @_ to each wasn't different... can we use some thing like this @msg1=$msg1; @msg2=$msg2; That would give you an array with on

Re: module installation

> and I have PERL5LIB defined in my .bash_profile > > export > PERL5LIB=/home/gwes/usr/local/lib/perl5/5.6.0:home/gwes/usr/local/lib/site_perl/5.6.0 This looks broken... try: export PERL5LIB=/home/gwes:/usr/local/lib/perl5/5.6.0:home/gwes/usr/local/lib/site_perl/5.6.0 Note the colon after '

Re: Recursive function

> The purpose is simple, search directory inside $depth levels for > directories. No need to reinvent the wheel: -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: using printf on specified fields of record

Joseph Paish wrote: > following is a sample of a record generated by a perl script i have > written ( i have put each field on a separate line in this email to > prevent word-wrapping) : > > > 12/05/2003 > sold > 8000 > widget1 > 0.055 > 29.95 > 30500 > 0 > 410.05 > -173.655333717579 << change to

using printf on specified fields of record

following is a sample of a record generated by a perl script i have written ( i have put each field on a separate line in this email to prevent word-wrapping) : 12/05/2003 sold 8000 widget1 0.055 29.95 30500 0 410.05 -173.655333717579 << change to 2 decimal places displayed 2225.37658

Re: Browser Properties

On Wed, 17 Nov 2004, Anish Kumar K. wrote: > I wanted to print out the Browser Informationlike internet > Explorer, Netscape, Firefox and some of its properties...Please let me > know with PERL CGI...There is any class What browser information? The user agent string? That's just kept in

Re: Autmatic function creation

Charles K. Clarkson <[EMAIL PROTECTED]> wrote: > [snip] > : : foreach my $method ( keys %InheritableClassData ) { > : : no strict 'refs'; > : : *$method = sub { > : : shift; > : : $InheritableClassData{$_} = shift if @_; > : : return $InheritableClassData{$_}; > : :

RE: date subtraction

Vladimir Lemberg wrote: > ... > Seq:1 Sat Nov 13 21:57:34 PST 2004 > Seq:2 Sat Nov 13 22:05:17 PST 2004 > Seq:3 Sun Nov 14 03:42:01 PST 2004 > Seq:4 Sun Nov 14 21:57:34 PST 2004 > > I need to subtract dates to know how long each Seg took time. Is > there any way to convert dates back to timestamps

Browser Properties

Hi I wanted to print out the Browser Informationlike internet Explorer, Netscape, Firefox and some of its properties...Please let me know with PERL CGI...There is any class Anish

Re: How to finding sting in an array

perldoc perlfaq On Wed, 17 Nov 2004 08:20:11 -0700, Bryan R Harris <[EMAIL PROTECTED]> wrote: Mauro wrote: I have to check if $mystring is an elemen of @myarray or not. Which is the quickest way to do this? That's a FAQ. perldoc -q contained Where can I find a list of the FAQs in perldoc?

Re: How to finding [STRING] in an array

Unless you're into beekeeping or dazzlingly wealthy tantric English rock stars, you're looking for "strings" in your arrays, not "sting" :-) On Wed, 17 Nov 2004, Bryan R Harris wrote: > > Mauro wrote: > >> I have to check if $mystring is an elemen of @myarray or not. > >> Which is the quickest

Re: How to finding sting in an array

> Mauro wrote: >> I have to check if $mystring is an elemen of @myarray or not. >> Which is the quickest way to do this? > > That's a FAQ. > > perldoc -q contained Where can I find a list of the FAQs in perldoc? Seems most of my questions are FAQs too... - B -- To unsubscribe, e-m

Re: How to finding sting in an array

On Wed, 17 Nov 2004 14:54:13 +0100, Gunnar Hjalmarsson <[EMAIL PROTECTED]> wrote: 3) Why use a regexp at all? print 'Yes it exists' if grep $mystring eq $_, @myarray; 4) Why continue looping through the whole array when a matching element has been found? for (@myarray) { pr

Re: Regarding ENV PATH

Anish Kumar K. wrote: I have a PL file in say /home/anish And in the program I have specified the $BASE_ROOT=/home/anish suppose i move the program to /home/abctest The problem I am facing is the directory structure is failingas in the PL files it ishardcoded as /home/anish IS there any way usi

RE: Autmatic function creation

Michael Kraus <[EMAIL PROTECTED]> wrote: : What I was trying to achieve with this: : : --START-- : our %InheritableClassData = ( : DBH => undef, : Q => undef, : Handler => undef, : ); : : foreach (qq(DBH Q Handler)) { : sub $_ { : shift; : $InheritableClassData{$_} = shift if @

Re: Regarding ENV PATH

On Nov 17, 2004, at 3:20 PM, Anish Kumar K. wrote: I have a PL file in say /home/anish And in the program I have specified the $BASE_ROOT=/home/anish suppose i move the program to /home/abctest The problem I am facing is the directory structure is failingas in the PL files it ishardcoded as /h

Regarding ENV PATH

Hi I have a PL file in say /home/anish And in the program I have specified the $BASE_ROOT=/home/anish suppose i move the program to /home/abctest The problem I am facing is the directory structure is failingas in the PL files it ishardcoded as /home/anish IS there any way using $ENV{"PAT

Re: how to read header of messages on server using socket

On Wed, 2004-11-17 at 17:36, supriya devburman wrote: > hi can anybody tell me > how to read header of > incoming messages on pop3 > mail server using > socket. > > Thnx > use Mail::POP3Client http://search.cpan.org/~sdowd/POP3Client-2.13/POP3Client.pm Ram -- To unsubscribe, e-mail: [EMAI

Re: How to finding sting in an array

JupiterHost.Net wrote: Edward WIJAYA wrote: On Wed, 17 Nov 2004 16:35:58 +0530, Prasanna Kothari <[EMAIL PROTECTED]> wrote: try using grep function. perldoc -f grep Yes correct, didn't think of that before. @exist_elems = grep {/$mystring/} @array_orgn; 0) there is no 'my' in that example, use

RE: Question on chat message

Hi The reasoned I am using 2 message because both message are different. Both can be printed same time. can we use some thing like this @msg1=$msg1; @msg2=$msg2; Regards Sreedhar -Original Message- From: JupiterHost.Net [mailto:[EMAIL PROTECTED] Sent: 17 November 2004 13:36 To: [EMA

Re: how to read header of messages on server using socket

supriya devburman wrote: hi can anybody tell me how to read header of incoming messages on pop3 mail server using I think Mail::POP3Client can do this, take a look at search.cpan.org HTH :) Lee.M - JupiterHost.Net -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMA

Re: Question on chat message

[EMAIL PROTECTED] wrote: Hi Hello, Add on to my question I have defined 2 variable. Still it is sending message to both channel use strict and warnings :) sub DoChat { @msg1 = @_; @msg2 = @_; Why 2 variables? Its the same thing? my @msg [EMAIL PROTECTED]; ... SendIrc($chatchannel1,@msg)

Re: How to finding sting in an array

Edward WIJAYA wrote: On Wed, 17 Nov 2004 16:35:58 +0530, Prasanna Kothari <[EMAIL PROTECTED]> wrote: try using grep function. perldoc -f grep Yes correct, didn't think of that before. @exist_elems = grep {/$mystring/} @array_orgn; 0) there is no 'my' in that example, use strict and warnings :)

Re: How to finding sting in an array

Mauro wrote: I have to check if $mystring is an elemen of @myarray or not. Which is the quickest way to do this? That's a FAQ. perldoc -q contained -- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

Re: How to finding sting in an array

On Wed, 17 Nov 2004 16:35:58 +0530, Prasanna Kothari <[EMAIL PROTECTED]> wrote: try using grep function. perldoc -f grep Yes correct, didn't think of that before. @exist_elems = grep {/$mystring/} @array_orgn; #note this is untested -- Regards, Edward WIJAYA SINGAPORE -- To unsubscribe, e-mail

Re: How to finding sting in an array

On Wed, 17 Nov 2004 11:23:24 +0100, Mauro <[EMAIL PROTECTED]> wrote: Hi all, I have to check if $mystring is an elemen of @myarray or not. Which is the quickest way to do this? foreach (@array) { if ($mystring) { print "Exist\n"; } } Thank You Mauro --

RE: Question on chat message

Hi Add on to my question I have defined 2 variable. Still it is sending message to both channel sub DoChat { @msg1 = @_; @msg2 = @_; GetIrcConnection("$chatuser","$chatirc") or die "unable to get irc connection for user $chatuser on channel $chatirc$!"; SendIrc("$chatchannel1","

how to read header of messages on server using socket

hi can anybody tell me how to read header of incoming messages on pop3 mail server using socket. Thnx __ Do you Yahoo!? Meet the all-new My Yahoo! - Try it today! http://my.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For addi

Question on chat message

Hi I have written a script chat message. when there is an error, currently it sends information only one chat server. How to add two chat server names. Say Message 1 --> Chat server 1 Say Message 2 --> Chat Server 2 Can some one advice me Regards Sreedhar Visit our website at http://www.

Re: How to finding sting in an array

try using grep function. perldoc -f grep Mauro wrote: Hi all, I have to check if $mystring is an elemen of @myarray or not. Which is the quickest way to do this? Thank You Mauro -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

How to finding sting in an array

Hi all, I have to check if $mystring is an elemen of @myarray or not. Which is the quickest way to do this? Thank You Mauro