On Fri, May 17, 2002 at 04:41:39PM +0800, [EMAIL PROTECTED] wrote:
> FWIW: Looking back at my original script, I had declared the variables
> $name, $age, $phone *OUTSIDE*OF* the foreach loop. That's why they were
> undefined!!!
>
> my ($name, $age, $phone);
> foreach (qw(name age phone)) {
On Sat, 18 May 2002, Michael Fowler wrote:
> Given your code above, that isn't the problem. Where they're declared has
> no effect on the definedness; it does, however, cause compile-time errors
> when use strict is in effect. That is not the problem you were
> encountering, though. The variabl
FWIW: This is the solution that I finally settled upon (in full context):
$column_names = "COMPANY_NAME,JOB_TITLE,JOB_ID,URL,MAIL_TO,ATTACH,DATE";
foreach (qw(company_name job_title job_id url mail_to attach)), time) {
# Append the quote'd parameter-value || the time-value in the list
$new_va
> > > -Original Message-
> > > From: Ned Cunningham [mailto:[EMAIL PROTECTED]]
> > T Nobel
> > >
> > > I am trying to replace the spaces with a single space
> > >
> > > My code so snippet is:
> > >
> > > $cuname = $data[53];
> > >
> > > $newcuname = /" "+/" "/$cuname;
> >
> > Thi
Hi All
Is there an easier way of picking out the number 16764 in this line
rather that using an array, split then $number[3]
I just want to get 16764 into $recievedmail
Is the answer something like this
$recievedmail = ($data)[3];
$data = "Received 921MB 16764 3955 375 2.2% 1296 7.7%";
Hi,
I am working on finding a group of consecutive numbers within a given array. I have
tried many ways doing that, however I have not succeeded in that. Here is an example
that illustrates my task.
imagine that we have got this list or array which contains some consecutive numbers
e.g. (1,2,3,
Hi,
I am working on a chunk of PERL software that can find out the groups of consecutive
numbers located within a list. For instance imagine that the list contains 1, 2, 3, 4,
10, 14, 15, 16, 20, 34, 35, 36,...
the program has to locate 1, 2, 3, 4 14, 15, 16 34, 35, 3
Would the owners of com.com be able to access any cookies set by any domain
that ends with .com?
While working with CGI::Application and CGI::Session and going through my
cookies on my local machine I noticed a cookie from com.com
Any insight from anyone about this?
--
To unsubscribe, e-mai
Hi again,
Thanks john for helping me with this solution to get the 16764 out of
the $data string
($recievedmail) = $data =~ /\b(\d+)\b/;
I have another question
How would I pick out the 375 in the same string
$data = "Received 921MB 16764 3955 375 2.2% 1296 7.7%";
--
To unsubscrib
Hi -
use strict;
my $data = "Received 921MB 16764 3955 375 2.2% 1296 7.7%";
@_ = $data =~ /\b(\d+)\b/g;
print "$_\n" for (@_); # prints 16764 3955 375 2 2 1296 7 7
print "$_[2]\n";# prints your guy: 375
Throw the "global" (g) on the RegEx and get the results into an array..
I know all about printing html to a browser from a CGI script, but is it
possible to put PHP in that html? If so, how?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Hi -
Please try:
use strict;
my @list = (1, 2, 3, 4, 10, 14, 15, 16, 20, 34, 35, 36,);
my %conseq; # temp hash
$conseq{$_} = $_ for (@list);
for (keys %conseq) {delete $conseq{$_} unless $conseq{$_-1} or
$conseq{$_+1}}
my @conseq; # result (note: remember scalars, arrays, hashes
# h
Hey Haitham,
My MUA believes you used Microsoft Outlook Express 6.00.2600.
to write the following on Friday, May 17, 2002 at 10:08:48 PM.
HNT> Hi, I am working on a chunk of PERL software that can find out
HNT> the groups of consecutive numbers located within a list. For
HNT> instance imagin
Hey all, I have noticed people suggesting/using the 'use warnings;'
statement, and I had been using the 'use diagnostics;' statement. I
started the 'diagnostics' thing based on reading this list a number
of months ago. Now the recomendation seems to have changed. Is
that true, and if
On Friday, May 17, 2002, at 07:44 , bob ackerman wrote:
[..]
> try it without the 'my' on your variables.
> and then tell me why that matters as you thwack yourself upside.
"I do not like you sam I am, I do not like
you with green eggs or Ham"
http://www.wetware.com/
Hi -
Unless I'm missing something, just print ...php stuff; Anything printed
to STDOUT in a CGI module populates the web page. If you are using a CPAN
module to generate HTML, just be sure to be "outside" his function calls.
Aloha - Beau.
-Original Message-
From: Mat Harris [mailto:
On Friday, May 17, 2002, at 07:08 , Haitham N Traboulsi wrote:
> Hi,
> I am working on a chunk of PERL software that can find out the groups of
> consecutive numbers located within a list. For instance imagine that the
> list contains 1, 2, 3, 4, 10, 14, 15, 16, 20, 34, 35, 36,
If this is homework, please send me 50% credit...
-Original Message-
From: Haitham N Traboulsi [mailto:[EMAIL PROTECTED]]
Sent: Friday, May 17, 2002 4:09 PM
To: [EMAIL PROTECTED]
Subject: help!
Hi,
I am working on a chunk of PERL software that can find out the groups of
consecutive numb
Hi all -
I would like to recommend "Effective Perl Programming" by Joseph N. Hall
with Randal L, Schwartz, Addison-Wesley, 1998, ISBN 0-201-41975-0. Although
"old", it has really helped my style.
I was raised with c. My early Perl efforts were very c-ish. For example, to
print an array I went fr
On Saturday, May 18, 2002, at 06:20 , Tim Musson wrote:
>
> Hey all, I have noticed people suggesting/using the 'use warnings;'
> statement, and I had been using the 'use diagnostics;' statement. I
> started the 'diagnostics' thing based on reading this list a number
> of months ago. N
On Saturday, May 18, 2002, at 06:22 , Beau E. Cox wrote:
>
> Please try:
not a bad solution per se - but there are two
issues that we do not know - since we are not privy
to the actual homework assignment itself -
a) will returning a list of the consecutive numbers
suff
Hello:
I'm trying to get the following (blissfully short) script to work. As you
can see, it's supposed to send mail. And when I run it, it returns without
an error. But no mail is ever sent.
Note that I do have Net::SMTP installed, and I am able to send mail directly
using Net::SMTP.
Any th
No, really - I showed you mine, now you show me yours!
Aloha - Beau.
-Original Message-
From: drieux [mailto:[EMAIL PROTECTED]]
Sent: Saturday, May 18, 2002 4:47 AM
To: [EMAIL PROTECTED]
Subject: the homework assignment problem
On Saturday, May 18, 2002, at 06:22 , Beau E. Cox wrote:
--- "Beau E. Cox" <[EMAIL PROTECTED]> wrote:
> Hi -
>
> Please try:
>
> use strict;
>
> my @list = (1, 2, 3, 4, 10, 14, 15, 16, 20, 34, 35, 36,);
> my %conseq; # temp hash
> $conseq{$_} = $_ for (@list);
> for (keys %conseq) {delete $conseq{$_} unless $conseq{$_-1} or
> $conseq{$_+1}}
> my @co
It would also help me and, perhaps, some of the less astute out here who, like me,
haven't:
- been near a college
- saw Perl for the first time only a few weeks ago
- read so-called relevant bits of Perl for Dummies to try and obtain a solution
wanted urgently in a prod environment
- have on
Ok, but, but...
I ignored uniqueness because non-unique numbers are NOT consecutive.
My solution works on non-sorted input arrays.
Aloha - Beau.
-Original Message-
From: Harry Jackson [mailto:[EMAIL PROTECTED]]
Sent: Saturday, May 18, 2002 5:01 AM
To: [EMAIL PROTECTED]
Subject: RE: help
> "Haitham" == Haitham N Traboulsi <[EMAIL PROTECTED]> writes:
Haitham> Here is an example that illustrates my task. imagine that
Haitham> we have got this list or array which contains some
Haitham> consecutive numbers e.g. (1, 2, 3, 4, 6, 8, 34, 50, 51, 52,
Haitham> 60, 66,
on Sat, 18 May 2002 15:05:01 GMT, Cathy Gear wrote:
> It would also help me and, perhaps, some of the less astute out here
> who, like me, haven't:
> - been near a college
> - saw Perl for the first time only a few weeks ago
> - read so-called relevant bits of Perl for Dummies to try and obta
> "Cathy" == CATHY GEAR (TRUST HQ)" <[EMAIL PROTECTED]>> writes:
Cathy> But sometimes I don't hold out much hope as I don't
Cathy> understand the significance of foo or bar!
foo and bar are 'meta-syntactic variables'; variables names that we use
when describing how programs work, to
On Saturday, May 18, 2002, at 05:09 , Beau E. Cox wrote:
> use strict;
>
> my $data = "Received 921MB 16764 3955 375 2.2% 1296 7.7%";
> @_ = $data =~ /\b(\d+)\b/g;
> print "$_\n" for (@_);# prints 16764 3955 375 2 2 1296 7 7
> print "$_[2]\n"; # prints your guy: 375
>
>
Thanks, Felix.
Your suggestion worked. I'm now performing inserts on my MS_SQL
database.
-fjohnson
"Felix Geerinckx" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> on Fri, 17 May 2002 01:32:54 GMT, Fjohnson wrote:
>
> > The error I am getting with this ver
Thanks very much Dieux for the illustrations. It's the
answer for question #1.
I still seem can not figure out the answer for
question #2 by myself. Can you please help?
Thanks.
--- drieux <[EMAIL PROTECTED]> wrote:
>
> On Friday, May 17, 2002, at 03:18 , loan tran wrote:
> > My question are:
>
On Saturday, May 18, 2002, at 08:42 , Chris Ball wrote:
[..]
>
> foo and bar are 'meta-syntactic variables'; variables names that we use
> when describing how programs work, to show that we're talking about
> something that could be any variable. You can read about them at:
>
>http://www.tux
On Saturday, May 18, 2002, at 10:11 , loan tran wrote:
[..]
> I still seem can not figure out the answer for
> question #2 by myself. Can you please help?
> Thanks.
the only way to keep state between reboots is
to write volitile memory to a persistent storage in some
place which will survive the
On Saturday, May 18, 2002, at 07:53 , Geoffrey F. Green wrote:
[..]
> Note that I do have Net::SMTP installed, and I am able to send mail
> directly
> using Net::SMTP.
[..]
> (Running OS X 10.1.4, if it matters.)
nope - jeeves is also an OS X box
[..]
> my %headers = (
> From=> '[EMAIL P
On Saturday, May 18, 2002, at 11:33 , Timothy Johnson wrote:
> BTW, what does the cf stand for?
it is a percursor to "perldoc $arg $bob" - used
to denote that there exists some documentation with
regards to the matter at hand. In the case of a
direct quote to denote that this is an abreviation
Thanks very much.
Loan
--- drieux <[EMAIL PROTECTED]> wrote:
>
> On Saturday, May 18, 2002, at 10:11 , loan tran
> wrote:
> [..]
> > I still seem can not figure out the answer for
> > question #2 by myself. Can you please help?
> > Thanks.
>
> the only way to keep state between reboots is
> to w
Tim Musson wrote:
>
> Hey all, I have noticed people suggesting/using the 'use warnings;'
> statement, and I had been using the 'use diagnostics;' statement. I
> started the 'diagnostics' thing based on reading this list a number
> of months ago. Now the recomendation seems to have chan
"Beau E. Cox" wrote:
>
> Hi all -
Hello,
> I would like to recommend "Effective Perl Programming" by Joseph N. Hall
> with Randal L, Schwartz, Addison-Wesley, 1998, ISBN 0-201-41975-0. Although
> "old", it has really helped my style.
Anyone want an autographed copy?[0] :-)
> I was raised wit
On Saturday, May 18, 2002, at 12:53 , John W. Krahn wrote:
> Semi-colons, like commas, are separators not terminators.
fore the semantically disenabled, the distinction betwee
the notion of a 'separator' and a 'terminator' is what?
>
> John
> [0] sorry I'm keeping it.
> [1] for you acronymly i
On Sat, May 18, 2002 at 01:05:57AM +0800, [EMAIL PROTECTED] wrote:
> On Sat, 18 May 2002, Michael Fowler wrote:
> > Instead of using DBI's quote method use placeholders:
> > $dbh->do(
> > "INSERT INTO $dbfile ($column_names) VALUES (?, ?, ?)",
> > {},
> > $age, $name, $
Drieux wrote:
>
> On Saturday, May 18, 2002, at 12:53 , John W. Krahn wrote:
>
> > Semi-colons, like commas, are separators not terminators.
>
> fore the semantically disenabled, the distinction betwee
> the notion of a 'separator' and a 'terminator' is what?
A separator is required _between_
On Saturday, May 18, 2002, at 03:08 , John W. Krahn wrote:
[..]
>
> A separator is required _between_ objects. A terminator is required _at
> the end of_ objects. A delimiter is required _at the beginning and end_
> of objects.
>
> Quotation marks, braces, brackets, and parenthesis are delimite
Begin forwarded message:
> From: [EMAIL PROTECTED]
> Date: Sat May 18, 2002 04:30:36 US/Pacific
> To: [EMAIL PROTECTED]
> Subject: Does Mail::Mailer work?
>
> We'll see
George -
just loaded up what I needed to run this from bbedit
{ have I mentioned that bbedit on an OSX box is the obl
We'll see - seems to work for me George
### #!/usr/bin/perl -w
### use strict;
###
### # #FILENAME#- is for email testing of Greens problem
### # cf : http://archive.develooper.com/beginners%40perl.org/msg26413.html
### # http://www.wetware.com/drieux/pbl/email/useMailMailer.txt
###
### use stri
Drieux wrote:
>
> On Saturday, May 18, 2002, at 03:08 , John W. Krahn wrote:
> >
> > A separator is required _between_ objects. A terminator is required _at
> > the end of_ objects. A delimiter is required _at the beginning and end_
> > of objects.
> >
> > Quotation marks, braces, brackets, and
46 matches
Mail list logo