can it be that you have 25 "?" but have 26 variables???
> hi,
> I write a script that does extract data from a dbf file and insert the
> value into mysql. After I ran it, it does not insert the data into
> mysql.
>
> the script:
>
> #!/usr/bin/perl -w
> use strict;
> use DBI;
> my ( $
> @list1 = qw( artist awful billy blunder)
> @list2 = qw( attitude blatherskite)
>
> # something magical happens, and the contents of @list1 are now
> # 'artist', 'attitude', 'awful', 'billy', 'blatherskite', 'blunder'
@list1 = sort @list1, @list2;
--
Eric Amick
Columbia, MD
__
>
> @list1 = qw( artist awful billy blunder)
> @list2 = qw( attitude blatherskite)
>
> # something magical happens, and the contents of @list1
are now
> # 'artist', 'attitude', 'awful', 'billy', 'blatherskite',
'blunder'
>
> If the lists aren't too large, here's what I'd do:
>
[EMAIL PROTECTED] wrote:
: Wizards,
:
: I know this is a no-brainer, but like I said...
:
: I'm sure there's something somewhere that will handle merging
: a sorted list of text into a larger sorted list of text, I'm
: just having a case of the lazy-thumbs today. Anybody care to
: point me in the
> @list1 = qw( artist awful billy blunder)
> @list2 = qw( attitude blatherskite)
>
> # something magical happens, and the contents of @list1 are now
> # 'artist', 'attitude', 'awful', 'billy', 'blatherskite', 'blunder'
@list1 = qw[ artist awful billy blunder ];
@list2 = qw[ attitude blatherski
@list1 = sort(@list1,@list2) seems to do what you want to do.
On 5/19/06, [EMAIL PROTECTED]
<[EMAIL PROTECTED]> wrote:
Wizards,
I know this is a no-brainer, but like I said...
I'm sure there's something somewhere that will handle merging a sorted list
of text into a larger sorted list of text
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: 19 May 2006 16:10
To: activeperl@listserv.ActiveState.com
Subject: No-brainer, pressed for time
> Wizards,
>
> I know this is a no-brainer, but like I said...
>
> I'm sure there's something somewhere that wi
Wayne,
I overstated the simplicity. Each list is divided into parts, viz.
[ADD]
add this
add this too
[DELETE]
delete this
delete this as well
[END]
would be the "recipient", while the "donor" could be
[ADD]
add this as well
[DELETE]
delete this too
[END]
or
[ADD]
[DELETE]
[END]
or anythin
@list1 = qw( artist awful billy blunder)
@list2 = qw( attitude blatherskite)
# something magical happens, and the contents of @list1 are now
# 'artist', 'attitude', 'awful', 'billy', 'blatherskite', 'blunder'
If the lists aren't too large, here's what I'd do:
@list1 = (@list1, @
[EMAIL PROTECTED] wrote:
> Wizards,
>
> I know this is a no-brainer, but like I said...
>
> I'm sure there's something somewhere that will handle merging a
> sorted list of text into a larger sorted list of text, I'm just
> having a case of the lazy-thumbs today. Anybody care to point me in
> the
Magic:
@list1=sort (@list1,@list2);
<[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
Wizards,
I know this is a no-brainer, but like I said...
I'm sure there's something somewhere that will handle merging a sorted list
of text into a larger sorted list of text, I'm just having a ca
Hi all,
I have to use complex types to create a webservice
returning multiple fields from multiple records
Here is my sample code :
my @F = ();
my $f1 =
Foo ->new({
FieldName => 'Name1',
FieldValue => 'Value1'
});
push @F, $f1->as_raw_data;
….
push @F, $f2->a
Wizards,
I know this is a no-brainer, but like I said...
I'm sure there's something somewhere that will handle merging a sorted list of text into a larger sorted list of text, I'm just having a case of the lazy-thumbs today. Anybody care to point me in the right direction? Here's what I'm tryi
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: 19 May 2006 13:02
To: Brian Raven
Cc: activeperl@listserv.ActiveState.com
Subject: Re: font size and color
> hi brian --
>
> In a message dated 5/19/2006 5:50:31 A.M. Eastern Standard Time,
[EMAIL PROTECTED
On 5/19/06, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
In a message dated 5/19/2006 5:50:31 A.M. Eastern Standard Time,
[EMAIL PROTECTED] writes:
> > actually, you can redirect STDOUT to a tk widget. this would affect
> print() and
> > printf(), but not sprintf(). see code below. (note:
hi brian --
In a message dated 5/19/2006 5:50:31 A.M. Eastern Standard Time,
[EMAIL PROTECTED] writes:
> > actually, you can redirect STDOUT to a tk widget.
this would affect> print() and > > printf(), but not
sprintf(). see code below. (note: untie() in>
code triggers warnings
Try checking $DBI::err after each database
statement. If $DBI::err is set, print out $DBI::errstr. This will help you find
SQL commands that are failing.
For example…
$dbh->do(“some SQL command”)
if ($DBI::err) {
die “$DBI::errstr\n”;
}
You might also try an insert manually
Hi Eko,
I did not test the script, but what looks strange to me is:
my ( $brg ) = @$row;
I doubt that this assignment really fills the variable list declared at the
beginning of the script and if it does it is at least highly "illegible".
I would suggest to use fetchrow_hashref, which returns
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Eko
Budiharto
Sent: 19 May 2006 04:43
To: activeperl@listserv.ActiveState.com
Subject: error in inserting to mysql
> hi,
> I write a script that does extract data from a dbf file and insert the
value into mysql. After I ran it, it
> d
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: 18 May 2006 15:32
To: [EMAIL PROTECTED]
Cc: activeperl@listserv.ActiveState.com
Subject: Re: font size and color
> In a message dated 5/17/2006 11:55:52 P.M. Eastern Standard Time,
[EMAIL PROTECTED] writes:
>
20 matches
Mail list logo