Charles Logan wrote:
>
> Hello... I have written a small script that uses lynx to retrieve data from an
> external web site, then parse and format parts of that data, finally writing
> out a script for a java based application which displays the data on the
> local web page. The perl script is ca
Hello... I have written a small script that uses lynx to retrieve data from an
external web site, then parse and format parts of that data, finally writing
out a script for a java based application which displays the data on the
local web page. The perl script is called via an #exec cmd in the
Which one of these would be best equipped for SQL database work/designs? If
one is a
webmaster or webmaster in training, which language would have the best means
for creating
and marinating a dynamic database driven web site? I'm thinking in
particular of a mysql database to
create a dynamic data
Hi
I have 10 files, each file has 3000 lines. I have two options but I need to
know which option is better in disk space and in cpu (the fastest one when I
need th edata):
1. Keep the 10 files in one Zip, and When its time to use them, unzip them,
and start parsing and processing each one.
2.
Raghupathy wrote:
> Rob,
>
>The input file you described is not correct, since
> it has
> #ifdef def2
> statement3;
> #else
> statement4;
> #endif
> nested within another #ifdef ... #else ... #endif.
>
> My input file is the output of
> "diff -D def file1 file2" (on unix). This will
> gen
Hi,
I finally got what i wanted. Anyways I would like to know how does
Mime::Parser decides of the name of the folder
here is my code (it is rough)
open(CURRMSG,">c:\\message.msg");
$pop3->get($msg_id, \*CURRMSG);
close CURRMSG;
$parser = new MIME::Parser;
$parser->output_under("C:\\mail\\pop3\\
Rob,
The input file you described is not correct, since
it has
#ifdef def2
statement3;
#else
statement4;
#endif
nested within another #ifdef ... #else ... #endif.
My input file is the output of
"diff -D def file1 file2" (on unix). This will
generate a file which has the following pattern
> It was Thursday, July 31, 2003 when Dan Muey took the soap
> box, saying:
> : If I do
> :
> : use DBI;
> : my $dbh = DBI->connect('DBI:mysql:localhost','user','pass');
> :
> : To connect to the mysql driver the package name is actually
> DBI::db not DBI.
> :
> : My question is: is it alway
It was Thursday, July 31, 2003 when Dan Muey took the soap box, saying:
: If I do
:
: use DBI;
: my $dbh = DBI->connect('DBI:mysql:localhost','user','pass');
:
: To connect to the mysql driver the package name is actually DBI::db not DBI.
:
: My question is: is it always going to be DBI::db reg
Thank you that worked, and thank you for the tip about
chomp/chop
--- Rob Dixon <[EMAIL PROTECTED]> wrote:
>
> "Quenten Griffith" <[EMAIL PROTECTED]> wrote in
> message
>
news:[EMAIL PROTECTED]
> > Hello all I have a script that reads in a control
> file
> > that list a dir. to
> > change to insid
If I do
use DBI;
my $dbh = DBI->connect('DBI:mysql:localhost','user','pass');
To connect to the mysql driver the package name is actually DBI::db not DBI.
My question is: is it always going to be DBI::db regardless of the driver?
I need ot know for some stuff I'm making that uses the name space
Raghupathy wrote:
> Hi All,
>
> I have a text file as shown below. How do I match
> patterns like the following:
>
> Pattern to be matched:
> =
> #ifndef def
> .. (anything except #if)
> #else def
> ... (anything except #if)
> #endif def
>
>
> My Input Data:
> =
> > Just send an html message via Mail::Sender.
> > Check out cpan to see how, Jenda has example galore!
> I looked at the examples and so I assume that within
> the html, you can add Font and Size. Is this the only way to
> accomplish the task? I can set the the Font/Size within
> Outlook
Hi Jeff,
You may get a more informed response from the mod_perl mailing list.
([EMAIL PROTECTED])
But I would generally get perl installed, then worry about updating getting
a mod_perl enabled apache installed
(http://perl.apache.org/docs/1.0/guide/install.html#A_Summary_of_a_Basic_mod
_perl_Inst
Hi All,
I have a text file as shown below. How do I match
patterns like the following:
Pattern to be matched:
=
#ifndef def
.. (anything except #if)
#else def
... (anything except #if)
#endif def
My Input Data:
==
Dan Muey wrote:
>> I use mail::sendmail or mail::sender, but I need to be
>
> You mean Mail::X , may not seem like much but Case Matters!
>
>
>> able to send the msg as body of text but with font/size vs default
>> of receiver.
>>
>> I am unsure where to look or what to look for.
Rob Dixon wrote:
>
> John W. Krahn wrote:
> > Rob Dixon wrote:
> > >
> > > Also your check for a hex number is wrong - it will be successful if the
> > > string contains at least one alpha character. Change this for
> > >
> > > if ($flds[5] =~ /^[a-z0-9]+$/)
> >
> > Also wrong. It should be:
>
John W. Krahn wrote:
> Rob Dixon wrote:
> >
> > Sudarshan Raghavan wrote:
> > > Sachin Hegde wrote:
> > > >
> > > > <131> if($flds[5] =~ /[a-zA-Z]+/)# Check for a hex number
> >
> > Also your check for a hex number is wrong - it will be successful if the
> > string contains at least
Li Ngok Lam wrote:
> > I'm still puzzled as to how Kenneth managed to get a listing of his
> > program out of a Perl command. Let us know how you're getting
> > on Kenneth, if you're still watching this thread.
>
> Hi Rob and Kenneth,
>
> I still watching in this thread, but I am not sure did I mis
I am creating a good many perl scripts on a Unix using emacs.
Can someone tell me what I need in my .emacs to do perl syntax compiles from
emacs?
.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Rob Dixon wrote:
>
> Sudarshan Raghavan wrote:
> > Sachin Hegde wrote:
> > >
> > > <131> if($flds[5] =~ /[a-zA-Z]+/)# Check for a hex number
>
> Also your check for a hex number is wrong - it will be successful if the
> string contains at least one alpha character. Change this for
>
>
> > Or am i missing the point?
>
> Yeah, I think you did.
>
>
> This is the real point...
>
> $x = "foo";
> $$x = 20;# this sets $foo
> print $foo; # prints "20"
> print $x;# still prints "foo"!.
>
> But like I said, this is usually a bad way of doing things.
> It is better t
It was Thursday, July 31, 2003 when Ohad Ohad took the soap box, saying:
: hey All,
:
: I need some pointers (essays, presentations whatever . . .) on Perl
: past/present/future .
: I'm looking for something as little technical as possible.
http://history.perl.org
Casey West
--
Shooting yo
hey All,
I need some pointers (essays, presentations whatever . . .) on Perl
past/present/future .
I'm looking for something as little technical as possible.
10x
_
Add photos to your e-mail with MSN 8. Get 2 months FREE*.
http://j
It was Thursday, July 31, 2003 when Michael Muratet took the soap box, saying:
: On Thu, 31 Jul 2003 14:15:17 -0400
: Casey West <[EMAIL PROTECTED]> wrote:
:
: > It was Thursday, July 31, 2003 when GregorioGonzalez took the soap
: > box, saying:: Hello:
: > :
: > : I have heard that PERL is more
On Thu, 31 Jul 2003 14:15:17 -0400
Casey West <[EMAIL PROTECTED]> wrote:
> It was Thursday, July 31, 2003 when GregorioGonzalez took the soap
> box, saying:: Hello:
> :
> : I have heard that PERL is more valuable than learning C++ in terms
> of: IT, etc.
> :
> : What is your view of the matter.
Hi,
I learn perl for about 3-4 slow years (meaning I am far from being
advanced), but I'm use to it.
I also don't know anything about IT stuff.
But I think learning perl before C++ would be good.
Actually the best which I had the chance to do because of my school, I
learnt perl bymyself and at m
> Or am i missing the point?
Yeah, I think you did.
In the first example:
> $var_name = $1; $value = $2;
> $$var_name = $value; # Or more compactly, $$1 = $2;
The variable *name* is dynamic (which is usually a bad practice).
In the second:
> $level = $2;
Here the variable name is hard-code
In the "Advanced Perl book" it gives an example of using sym ref:
--
process a command-line option such as "-Ddebug_level=3" and set the
$debug_level variable. This is one way of doing it:
while ($arg = shift @ARGV){
if ($arg =~ /-D(\w+)=(\w+)/) {
$var_name = $1; $value = $2;
> Hello:
Howdy!
>
> I have heard that PERL is more valuable than learning C++ in
> terms of IT, etc.
>
> What is your view of the matter.
>
Perl is super valuable for Administrator, developers, etcc...
Saying it's more valueable than c++ is like saying apples are more valuable than
oranges.
Hey Peter,
My MUA believes you used
to write the following on Thursday, July 31, 2003 at 10:45:04 AM.
PS> Look for Randal Schwartz's new book on references from O'Reilly.
Ah, cool, will get that soonest!
--
Tim Musson
Flying with The Bat! eMail v1.62q
Windows 2000 5.0.2195 (Service P
> I have heard that PERL is more valuable than learning C++
I guess it depends on what you are doing. Having done web work for 8 years
now I haven't had any use for C++, and never took the time to learn it (it's
still on my to-do list).
Besides the usual CGI scripts and mod_perl scripts, I have
It was Thursday, July 31, 2003 when GregorioGonzalez took the soap box, saying:
: Hello:
:
: I have heard that PERL is more valuable than learning C++ in terms of
: IT, etc.
:
: What is your view of the matter.
I agree.
I'm a case-in-point. In university I learnt C++ in the classroom,
Perl on
Hello:
I have heard that PERL is more valuable than learning C++ in terms of
IT, etc.
What is your view of the matter.
Regards,
GREGORIO GONZALEZ: Internet Business Developer
VERIO: An NTT Communications Company
TOLL FREE: 877-273-3190 EXT 4672
INTERNATIONAL: 011-561-999-8599 ext: 4672
EM
> I use mail::sendmail or mail::sender, but I need to be
You mean Mail::X , may not seem like much but Case Matters!
> able to send the msg as body of text but with font/size vs
> default of receiver.
>
> I am unsure where to look or what to look for.
Just send an html messag
Title: RE: config nightmares
I have attached info on my perl installation...perl -V
Does this look like its built correctly...
-Original Message-
From: Levon Barker [mailto:[EMAIL PROTECTED]]
Sent: Thursday, July 31, 2003 10:31 AM
To: Hodge, Jeff F (ECIII)
Cc: [EMAIL PROTECTED]
S
I use mail::sendmail or mail::sender, but I need to be able to send the msg as
body of text but with font/size vs default of receiver.
I am unsure where to look or what to look for.
Can it be done? If so, any pointers to or suggestions on how or simple example
of doing s
> I'm still puzzled as to how Kenneth managed to get a listing of his
> program out of a Perl command. Let us know how you're getting
> on Kenneth, if you're still watching this thread.
Hi Rob and Kenneth,
I still watching in this thread, but I am not sure did I missed something in
this thread. B
Things are just not working together. Originally I had perl 5.6.1/
apache1.3/mysql4.0.12/ mason1.22/and various mod's. At one point I thought
that I had "mod-perl" installed but it seems as if I had some selected
modules and not mod-perl itself installed.
I upgraded to perl 5.8 and realized th
On Tue, 29 Jul 2003 14:37:51 +0530, [EMAIL PROTECTED] (Ramprasad)
wrote:
>Hello all,
>
> I am confused at using MIME::Parser and adding attachments
>When I add an attachment thru MIME::Parser it is show as a seperate
>attachment on all clients
>But When I add an inline image thru a mail client
On Thu, Jul 31, 2003 at 09:32:32AM -0500, Distribution Lists wrote:
> Can someone give me a clue
>
> I want to search through a file for a given string, when the string is
> found then delete the whole line. For example
There's a nice FAQ on this
% perldoc -q 'change one line'
> test.user:
In article <[EMAIL PROTECTED]>,
[EMAIL PROTECTED] (Tim Musson) writes:
>Thanks Peter!,
[snip]
>PS> my $href = $result->as_struct;
>PS> for my $dn (keys %$href) {
>PS> print "cn of $dn is $href->{$dn}{cn}[0]\n";
>PS> }
>
>That is exactly what I was looking for!
>
>PS> (That's taking advantage of
Can someone give me a clue
I want to search through a file for a given string, when the string is
found then delete the whole line. For example
test.user: cd9p06
search for "test.user", then delete "test.user: cd9p06"
Thanks
--
http://www.e-securenetworks.net
http://www.shopper-holic.com
htt
Rob Dixon wrote:
>
> > This line is what I am having an issue with $dir = $1
> > if
> > /^Dir:\s+(\W\w+\W\w+)/;
> > That will match /your/path but it will not match /your
> > or /your/path/is.
>
> > Is there a better reg.exp. I can use that will match
> > anything with a / in and everything after
"Quenten Griffith" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED]
> Hello all I have a script that reads in a control file
> that list a dir. to
> change to inside the control file I have
>
> Dir: /cf/courseware
>
> The part of the Perl script that I run to pull in that
> info is
>
>
"Pandey Rajeev-A19514" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Hi,
>
> I want to create a module, say ABC.pm.
> I dont want to build and install the module.
>
> I want to use a function xyz() of the module ABC in some other script.
> AND, I want to call the function as
> xyz(
Li Ngok Lam wrote:
> - Original Message -
> From: "Rob Dixon" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Thursday, July 31, 2003 5:44 AM
> Subject: Re: I'm a Nebie to PERL
>
>
> [snap]
> > > > It ran and just listed the contents of the helloworld.pl file. PERL ran but
> > > > th
Pandey Rajeev-A19514 wrote:
Hi,
I want to create a module, say ABC.pm.
I dont want to build and install the module.
Not sure what you mean by this.
I want to use a function xyz() of the module ABC in some other script.
AND, I want to call the function as
xyz();
instead of
ABC::xyz();
This is p
Hi,
I want to create a module, say ABC.pm.
I dont want to build and install the module.
I want to use a function xyz() of the module ABC in some other script.
AND, I want to call the function as
xyz();
instead of
ABC::xyz();
Can anyone tell me how to do that without installing the module ?
Is i
Josimar Nunes De Oliveira wrote:
> Hi,
> Pablo, you should write this at line of IF command:
> if($count>0 && $count<$#archivo) {
> I hope you get the right thing you want.
Hi Pablo.
Josimar's right, and it also looks like you're not
using 'strict'? You may prefer the following, which
avo
Sudarshan Raghavan wrote:
> Sachin Hegde wrote:
>
> > Hi,
> > There is this warning which I can't remove :
> >
> > Illegal hexadecimal digit '
> > ' ignored at test.pl line 131, line 23.
>
>
> It is the newline at the end
>
> >
> >
> > test.pl is the name of the program while FH is a file handle(r
Pablo Fischer wrote:
>
> Ohh I found
>
> Just to change the 8 to 1, and Im going to use one of each one, not 9 by 9.
>
> for($i=0; $i<($#archivo-2); $i++) {
> push @lista_final, splice(@correos_p, 0, 1);
> push @lista_final, splice(@correos_h, 0, 1);
> push @lista_final, splice
Frank B. Ehrenfried wrote at Wed, 30 Jul 2003 15:34:01 -0700:
> I have downloaded the perl/tk module Tk804.02 from CPAN.ORG. I've
> unzipped and untarred it and placed it and it sub-directories uner "/".
> But my perl script can not find it. I get the response "Cann't locate
> Tk.pm in @INC".
Hi Frank,
You should install it using the given install scripts, not doing it by hand.
Like other perl modules you should do:
perl Makefile.PL ; make ; make test; make install
Afterwards, everything will be copied at the right place and correctly
declared.
Michel
-Message d'origine-
54 matches
Mail list logo
