[28424] in Perl-Users-Digest
Perl-Users Digest, Issue: 9788 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Oct 2 03:05:56 2006
Date: Mon, 2 Oct 2006 00:05:07 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Mon, 2 Oct 2006 Volume: 10 Number: 9788
Today's topics:
Does Perl have a wait command? ToddAndMargo@gbis.com
Re: Does Perl have a wait command? usenet@DavidFilmer.com
Re: Does Perl have a wait command? <jurgenex@hotmail.com>
Re: Does Perl have a wait command? ToddAndMargo@gbis.com
Re: Embedding the perl, part II <benmorrow@tiscali.co.uk>
how to read last row in a datafile ? <jack_posemsky@yahoo.com>
Re: how to read last row in a datafile ? <mritty@gmail.com>
Re: Modifying a one-liner <uri@stemsystems.com>
Re: Modifying a one-liner <uri@stemsystems.com>
Re: Modifying a one-liner beartiger@gmail.com
Re: Modifying a one-liner beartiger@gmail.com
Re: Modifying a one-liner beartiger@gmail.com
Re: Modifying a one-liner beartiger@gmail.com
Re: Modifying a one-liner <uri@stemsystems.com>
Re: My first socket question xhoster@gmail.com
new CPAN modules on Mon Oct 2 2006 (Randal Schwartz)
newbie syntax question -> and => ToddAndMargo@gbis.com
Re: newbie syntax question -> and => usenet@DavidFilmer.com
Re: newbie syntax question -> and => ToddAndMargo@gbis.com
Re: Problems with DBI and DBD::mysql (on Mac OS X 10.4, <benmorrow@tiscali.co.uk>
Re: Problems with DBI and DBD::mysql (on Mac OS X 10.4, <news@chaos-net.de>
Re: Tk- getOpenFile sticks on W2K server <source@netcom.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 1 Oct 2006 22:23:02 -0700
From: ToddAndMargo@gbis.com
Subject: Does Perl have a wait command?
Message-Id: <1159766582.119385.193630@i42g2000cwa.googlegroups.com>
Hi All,
I am a bit new to Perl. Does Perl have
a wait command that will suspend on the command
for a determined amount of time? Does it take
a lot of CPU cycles counting something (clock
cycles, etc.)? Or does it pretty much suspect the program
(low CPU usage)?
Many thanks,
-T
------------------------------
Date: 1 Oct 2006 22:44:08 -0700
From: usenet@DavidFilmer.com
Subject: Re: Does Perl have a wait command?
Message-Id: <1159767848.807814.129660@e3g2000cwe.googlegroups.com>
ToddAndMargo@gbis.com wrote:
> I am a bit new to Perl. Does Perl have
> a wait command
perldoc -f sleep
--
David Filmer (http://DavidFilmer.com)
------------------------------
Date: Mon, 02 Oct 2006 05:57:07 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: Does Perl have a wait command?
Message-Id: <TS1Ug.14323$Oh3.12202@trnddc04>
ToddAndMargo@gbis.com wrote:
> I am a bit new to Perl. Does Perl have
> a wait command
What happened when you just tried to read the documentation?
See "perldoc -f wait"
> that will suspend on the command
> for a determined amount of time?
You are not looking for wait(), you are looking for sleep().
Details see "perldoc -f sleep"
jue
------------------------------
Date: 1 Oct 2006 23:16:31 -0700
From: ToddAndMargo@gbis.com
Subject: Re: Does Perl have a wait command?
Message-Id: <1159769791.856203.56110@b28g2000cwb.googlegroups.com>
usenet@DavidFilmer.com wrote:
> ToddAndMargo@gbis.com wrote:
>
> > I am a bit new to Perl. Does Perl have
> > a wait command
>
> perldoc -f sleep
>
> --
> David Filmer (http://DavidFilmer.com)
Thank you!
------------------------------
Date: Sun, 1 Oct 2006 23:54:48 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Embedding the perl, part II
Message-Id: <oit5v3-oh7.ln1@osiris.mauzo.dyndns.org>
Quoth wahab-mail@gmx.net:
> Hi,
>
> after successfully integrating the static perl-lib
> into my C++-Programs, I came upon a minor annoyance
>
> I use the perl interpreter (like so many of you
> possibly do also) for input file fiddling,
> among other uses.
>
> After the C program enters its main function,
> I invoke the interpreter with exactly those lines
>
> (which is fairly standard afaik).
>
> static PerlInterpreter *my_perl;
> static char *embedding[] = { "", "-e", "0" };
> ...
>
> int main(int argc, char**argv, char **envp) {
Three-arg main is not entirely portable. extern char **environ is more
so. If you're really interested, Config.pm probably knows how to get at
the environment on this platform.
> ...
> PERL_SYS_INIT3( &argc, &argv, &envp );
> my_perl = perl_alloc();
> perl_construct( my_perl );
>
> // perl_parse(my_perl, 0, argc, argv, envp); // case #1
> perl_parse(my_perl, 0, 3, embedding, envp); // case #2
>
> PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
> perl_run(my_perl);
> ...
> (done initializing)
>
> What I want to get is: the C-argv's should go
> into @ARGV.
>
> If I use 'case #1' from above, the perl interpreter
> will *evaluate* all argv's given, what is clearly
> not what I want.
>
> In case #2, the @ARGV array will be, of course,
> empty, even though the %ENV will be set properly.
>
> I guess it might be necessary to set up a C-loop:
> ...
> for(i=1; i<argc; i++) {
> sprintf(buffer, "push @ARGV,'%s';", argv[i]);
> sv = eval_pv( buffer, TRUE );
> }
Firstly, there's no need to do it like this. Get yourself a pointer to
@ARGV with get_av and then fill it with av_extend and av_push
(pre-extending is more efficient). See perlapi. Apart from anything
else, this will break if an argument has a ' in it.
> My question: Can/should this be handled this way?
> Is there a more canonical way to tell the perl-interpreter
> linked to a program its command line arguments?
> (I didn't find a hint in the docs.)
I would have thought you could prepend '-e0', '--' to your argv and pass
that to perl_parse. Annoyingly you will need to allocate a new array of
char*, but that's C for you :(.
Ben
--
I touch the fire and it freezes me, [benmorrow@tiscali.co.uk]
I look into it and it's black.
Why can't I feel? My skin should crack and peel---
I want the fire back... Buffy, 'Once More With Feeling'
------------------------------
Date: 1 Oct 2006 18:45:18 -0700
From: "Jack" <jack_posemsky@yahoo.com>
Subject: how to read last row in a datafile ?
Message-Id: <1159753518.150693.283390@i3g2000cwc.googlegroups.com>
Hi there, does anyone know how to capture the last row in a datafile
into a variable without having to read through each record of the
entire file ?
Thank you,
Jack
------------------------------
Date: 1 Oct 2006 19:35:53 -0700
From: "Paul Lalli" <mritty@gmail.com>
Subject: Re: how to read last row in a datafile ?
Message-Id: <1159756553.609683.202290@i3g2000cwc.googlegroups.com>
Jack wrote:
> Hi there, does anyone know how to capture the last row in a datafile
> into a variable without having to read through each record of the
> entire file ?
Download and install the File::ReadBackwards module from CPAN...
http://search.cpan.org/~uri/File-ReadBackwards-1.04/ReadBackwards.pm
Paul Lalli
------------------------------
Date: Sun, 01 Oct 2006 23:37:45 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Modifying a one-liner
Message-Id: <x7bqovmlpy.fsf@mail.sysarch.com>
>>>>> "b" == beartiger <beartiger@gmail.com> writes:
>> that is either a font style that
>> doesn't have lower case or a graphic style.
b> I don't think someone who hasn't found SHIFT on his keyboard is in any
b> position to comment on fonts or capitalization.
oooh, i am so hertz by that. please may i have another?
>> notice just next to it there
>> is 'Perl Quotes'.
b> Quick quiz for you, Urine Gnatman. Why would an asshole who goes about
b> on USENET being an asshole by correcting others' capitalization of
b> "Perl" spell it with ALL CAPS at the top of his index page (whatever
b> the excuse)? Because he's a dumbshit, that's why.
oh, insulting me with the 'urine' variation. that is so original. please
patent this insult and sue all the others who have babbled it before.
anyhow, this is a perl newsgroup and as you have nothing to say about
perl you should leave now. go or i will tell your mother on you and you
will go to bed without your supper or amiga to play with.
now i await your further childish responses which have nothing to do
with perl. tick. tick. tick.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: Sun, 01 Oct 2006 23:39:16 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Modifying a one-liner
Message-Id: <x764f3mlnf.fsf@mail.sysarch.com>
>>>>> "b" == beartiger <beartiger@gmail.com> writes:
b> Matt Garrish wrote:
b> <snip>
>> Is junior still trying to post here?
b> Are you still posting OT posts here after calling those who do
b> "morons", moron?
b> What does your post have to do with the language called Perl, Garrish?
b> If nothing, what exempts you from posting on topic here?
because he actually helps people with perl here. you do not. simple
binary test but that is beyond your skill level it seems. now go away
before your hurt yourself with those scissors.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: 1 Oct 2006 22:04:56 -0700
From: beartiger@gmail.com
Subject: Re: Modifying a one-liner
Message-Id: <1159765496.686673.266690@h48g2000cwc.googlegroups.com>
Mumia W. (reading news) wrote:
> On 10/01/2006 02:15 PM, beartiger@gmail.com wrote:
> > Uri Guttman wrote:
> >>>>>>> "b" == beartiger <beartiger@gmail.com> writes:
> >> b> Paul Lalli wrote:
> >>
> >> b> You are a spectacular asshole.
> >>
> >> >> > Two years ago, someone wrote me this PERL
> >> >>
> >> >> Perl. Not PERL.
> >>
> >> b> Then why do *you* spell it PERL here?
> >>
> >> b> http://cgi2.cs.rpi.edu/~lallip/perl/spring06/index.shtml
> >>
> >> b> Dumbshit.
> >>
> >> me thinks you are the dumber shit.
> >
> > Methinks if you're going to call other people dumbshits, you should
> > learn the correct spelling of "methinks", dumbshit.
> >
> >> that is either a font style that
> >> doesn't have lower case or a graphic style.
> >
> > I don't think someone who hasn't found SHIFT on his keyboard is in any
> > position to comment on fonts or capitalization.
> >
> >> notice just next to it there
> >> is 'Perl Quotes'.
> >
> > Quick quiz for you, Urine Gnatman. Why would an asshole who goes about
> > on USENET being an asshole by correcting others' capitalization of
> > "Perl" spell it with ALL CAPS at the top of his index page (whatever
> > the excuse)? Because he's a dumbshit, that's why.
> >
> >
> > J
> >
>
> Beartiger, why am I listening to you troll and abuse people? Oh wait,
> I'm not.
And of course you didn't respond, like a dog to Pavlov's bell, to
someone you consider a "troll". Oh wait, you just did--proving you're
a moron who just fell hook, line, and sinker for my "troll".
> Goodbye.
I'll believe it when I see it.
J
------------------------------
Date: 1 Oct 2006 22:05:25 -0700
From: beartiger@gmail.com
Subject: Re: Modifying a one-liner
Message-Id: <1159765525.716865.9350@c28g2000cwb.googlegroups.com>
Uri Guttman wrote:
> >>>>> "b" == beartiger <beartiger@gmail.com> writes:
Gee, what happened to Gnatman's misspelling? Hmm, seems to have
mysteriously gone missing. I don't suppose he deleted it because it
was just a little bit embarrassing, eh? Naw. Why would he do that?
Heh heh.
> >> that is either a font style that
> >> doesn't have lower case or a graphic style.
>
> b> I don't think someone who hasn't found SHIFT on his keyboard is in any
> b> position to comment on fonts or capitalization.
>
> oooh, i am so hertz by that. please may i have another?
>
> >> notice just next to it there
> >> is 'Perl Quotes'.
>
> b> Quick quiz for you, Urine Gnatman. Why would an asshole who goes about
> b> on USENET being an asshole by correcting others' capitalization of
> b> "Perl" spell it with ALL CAPS at the top of his index page (whatever
> b> the excuse)? Because he's a dumbshit, that's why.
>
> oh, insulting me with the 'urine' variation.
On an asshole scale of 1 to 8, urinate.
> that is so original. please
> patent this insult and sue all the others who have babbled it before.
>
> anyhow, this is a perl newsgroup and as you have nothing to say about
> perl you should leave now.
Make me. By the way, you can talk about others posting off topic,
because this post of your is sooooo relevant to Perl. Why don't you go
tell someone to use strict or warnings for the billionth time? Why
don't you tell someone to consult perldoc? That's a really fabulous
"contribution" to the Perl community.
> go or i will tell your mother on you and you
> will go to bed without your supper or amiga to play with.
>
> now i await your further childish responses which have nothing to do
> with perl. tick. tick. tick.
Right, and you'll go right on responding to someone you consider
"childish", while criticizing him for posting off topic while you
continue to do it yourself. Kook.
What does your response have to do with Perl? Or didn't you think
about that before you decided to chide me for posting off topic?
If it has nothing to do with Perl, what exempts you from posting on
topic?
J
------------------------------
Date: 1 Oct 2006 22:09:14 -0700
From: beartiger@gmail.com
Subject: Re: Modifying a one-liner
Message-Id: <1159765754.135482.64360@b28g2000cwb.googlegroups.com>
Tad McClellan wrote:
> Paul Lalli <mritty@gmail.com> wrote:
> > vjp2.at@at.BioStrategist.dot.dot.com wrote:
> >> Mind if I piggyback a request here?
> >
> > Yes. I do. There is no reason to post this message in an existing
> > thread. Start a new topic.
>
>
> That reply was pretty unAmerican of you!
I bet your girlfriend nicknamed you Tad.
J
------------------------------
Date: 1 Oct 2006 22:14:02 -0700
From: beartiger@gmail.com
Subject: Re: Modifying a one-liner
Message-Id: <1159766042.806589.32990@i3g2000cwc.googlegroups.com>
Uri Guttman wrote:
> >>>>> "b" == beartiger <beartiger@gmail.com> writes:
>
> b> Matt Garrish wrote:
> b> <snip>
> >> Is junior still trying to post here?
>
> b> Are you still posting OT posts here after calling those who do
> b> "morons", moron?
>
> b> What does your post have to do with the language called Perl, Garrish?
> b> If nothing, what exempts you from posting on topic here?
>
>
> because he actually helps people with perl here.
How does his or your off topic posts help people with the language you
don't even know how to spell properly?
Go ahead. Tell us, and burn up yet more bandwidth on this ng with your
off-topic posts.
J
------------------------------
Date: Mon, 02 Oct 2006 02:08:56 -0400
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Modifying a one-liner
Message-Id: <x7sli7l05j.fsf@mail.sysarch.com>
>>>>> "b" == beartiger <beartiger@gmail.com> writes:
b> Uri Guttman wrote:
>> >>>>> "b" == beartiger <beartiger@gmail.com> writes:
b> If it has nothing to do with Perl, what exempts you from posting on
b> topic?
by virtue of my trying to get you to leave. but you won't. have fun. we
have outlasted much worse trolls than you. you might as well leave now
because you will become bored trolling here.
on topic includes managing and isolating trolls. you are not wanted and
you aren't funny or anything but a troll. live with it. leave.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: 02 Oct 2006 02:33:01 GMT
From: xhoster@gmail.com
Subject: Re: My first socket question
Message-Id: <20061001223412.849$Al@newsreader.com>
Michele Dondi <bik.mido@tiscalinet.it> wrote:
...
> while (1) {
> $cnt++;
> $val=rand; # these are the important calculations!!
> next unless $sel->can_read(0.2);
Why the 0.2? If the main task is $cnt++ and $val=rand, then it should
be spending most of it's time there and not waiting for someone to make
a connection that quite likely will not come within any given 0.2 anyway.
If you want to artificially slow down the dummy server, I would at least
move the slowdown out of the can_read, like so:
select undef,undef,undef, 0.2;
next unless $sel->can_read(0);
What is the difference? In the first case, incoming connections will
almost always be attempted when you are in the can_read, while in the
second case (and presumably in the real world case) they will almost
certainly occur outside of the can_read. While this is not likely to make
a difference, you never know when it will--so it would be nice if your test
case is the one more like the real world case. In the same vein, if the
real server is going to do something CPU limited (rather than IO or network
limited), I would simulate that CPU limitation directly, rather than using
some form of CPU-sparing method like sleep or select to emulate it:
foreach my $foo (1..1e6) { foreach (1..1e3) { my $foo2=$foo*$_}};
next unless $sel->can_read(0);
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Mon, 2 Oct 2006 04:42:08 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Mon Oct 2 2006
Message-Id: <J6Hrq8.E9s@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Acme-Meta-0.02
http://search.cpan.org/~nwclark/Acme-Meta-0.02/
Enhances the Meta package
----
Acme-Steganography-Image-Png-0.06
http://search.cpan.org/~nwclark/Acme-Steganography-Image-Png-0.06/
hide data (badly) in Png images
----
CPAN-Reporter-0.24
http://search.cpan.org/~dagolden/CPAN-Reporter-0.24/
Provides Test::Reporter support for CPAN.pm
----
Config-Format-Ini-0.04
http://search.cpan.org/~ioannis/Config-Format-Ini-0.04/
Reads INI configuration files
----
Crypt-ProtectedString-0.00_01
http://search.cpan.org/~ido/Crypt-ProtectedString-0.00_01/
protected format for storing sensitive data in databases, with partial display capability.
----
DJabberd-0.81
http://search.cpan.org/~bradfitz/DJabberd-0.81/
scalable, extensible Jabber/XMPP server.
----
EekBoek-1.00.02
http://search.cpan.org/~jv/EekBoek-1.00.02/
Bookkeeping software for small and medium-size businesses
----
Geo-Postcodes-0.32
http://search.cpan.org/~arne/Geo-Postcodes-0.32/
Base class for the Geo::Postcodes::* modules
----
JSAN-Client-0.14
http://search.cpan.org/~adamk/JSAN-Client-0.14/
The JavaScript Archive Network Client Library
----
JSAN-Mini-0.03
http://search.cpan.org/~adamk/JSAN-Mini-0.03/
Creates a minimal local mirror of JSAN for offline installation
----
Lingua-EN-VarCon-1.00
http://search.cpan.org/~adamk/Lingua-EN-VarCon-1.00/
Provides access to the VarCon (Variant Conversion Info)
----
Net-DPAP-Client-0.26
http://search.cpan.org/~lbrocard/Net-DPAP-Client-0.26/
Connect to iPhoto shares (DPAP)
----
Net-Google-Calendar-0.4
http://search.cpan.org/~masanorih/Net-Google-Calendar-0.4/
programmatic access to Google's Calendar API
----
Net-Google-Calendar-0.4
http://search.cpan.org/~simonw/Net-Google-Calendar-0.4/
programmatic access to Google's Calendar API
----
Net-IPMessenger-0.04
http://search.cpan.org/~masanorih/Net-IPMessenger-0.04/
Interface to the IP Messenger Protocol
----
PITA-Test-Dummy-Perl5-Make-1.02
http://search.cpan.org/~adamk/PITA-Test-Dummy-Perl5-Make-1.02/
CPAN Test Dummy for PITA Makefile.PL installs
----
POE-Component-WWW-Shorten-1.04
http://search.cpan.org/~bingos/POE-Component-WWW-Shorten-1.04/
A non-blocking wrapper around WWW::Shorten.
----
Parallel-ForkControl-0.03
http://search.cpan.org/~blhotsky/Parallel-ForkControl-0.03/
Finer grained control of processes on a Unix System
----
PerlIO-gzip-0.18
http://search.cpan.org/~nwclark/PerlIO-gzip-0.18/
Perl extension to provide a PerlIO layer to gzip/gunzip
----
Process-0.18
http://search.cpan.org/~adamk/Process-0.18/
Objects that represent generic computational processes
----
Test-Script-1.01
http://search.cpan.org/~adamk/Test-Script-1.01/
Cross-platform basic tests for scripts
----
Text-Lorem-More-0.04
http://search.cpan.org/~rkrimen/Text-Lorem-More-0.04/
Generate correctly formatted nonsense using random Latin words.
----
Text-Lorem-More-0.05
http://search.cpan.org/~rkrimen/Text-Lorem-More-0.05/
Generate correctly formatted nonsense using random Latin words.
----
Text-Lorem-More-0.06
http://search.cpan.org/~rkrimen/Text-Lorem-More-0.06/
Generate correctly formatted nonsense using random Latin words.
----
Text-Lorem-More-0.07
http://search.cpan.org/~rkrimen/Text-Lorem-More-0.07/
Generate correctly formatted nonsense using random Latin words.
----
Text-Lorem-More-0.08
http://search.cpan.org/~rkrimen/Text-Lorem-More-0.08/
Generate correctly formatted nonsense using random Latin words.
----
Text-Lorem-More-0.09
http://search.cpan.org/~rkrimen/Text-Lorem-More-0.09/
Generate formatted nonsense using random Latin words.
----
sepia-0.64
http://search.cpan.org/~seano/sepia-0.64/
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: 1 Oct 2006 22:31:24 -0700
From: ToddAndMargo@gbis.com
Subject: newbie syntax question -> and =>
Message-Id: <1159767084.607816.234520@i42g2000cwa.googlegroups.com>
Hi All,
I am a bit new (okay A LOT NEW) to Perl. My
background is mostly Modula2 and Bash script.
Looking over an example, I notices "->" and "=>"
being used. For example:
my($sock) = IO::Socket::INET->new(PeerAddr => $host,
PeerPort => 'exec(512)', Proto => 'tcp');
and
$sock->syswrite("0\0", 2);
$sock->syswrite($user . "\0", length($user) + 1);
What are they doing and what is are their rules?
Many thanks,
-T
------------------------------
Date: 1 Oct 2006 22:45:54 -0700
From: usenet@DavidFilmer.com
Subject: Re: newbie syntax question -> and =>
Message-Id: <1159767954.747694.237370@m73g2000cwd.googlegroups.com>
ToddAndMargo@gbis.com wrote:
> Looking over an example, I notices "->" and "=>"
perldoc perlop
--
David Filmer (http://DavidFilmer.com)
------------------------------
Date: 1 Oct 2006 23:21:05 -0700
From: ToddAndMargo@gbis.com
Subject: Re: newbie syntax question -> and =>
Message-Id: <1159770065.195013.83690@m73g2000cwd.googlegroups.com>
usenet@DavidFilmer.com wrote:
> ToddAndMargo@gbis.com wrote:
> > Looking over an example, I notices "->" and "=>"
>
> perldoc perlop
>
> --
> David Filmer (http://DavidFilmer.com)
Thank you. I think i almost get it. "->" and
"=>" are the same thing but "->" has a
higher precedence than does "=>".
-T
big, big change over Modula2! I will learn
Perl if it kills me! (Well, may not kills me.)
------------------------------
Date: Sun, 1 Oct 2006 23:56:35 +0100
From: Ben Morrow <benmorrow@tiscali.co.uk>
Subject: Re: Problems with DBI and DBD::mysql (on Mac OS X 10.4, Intel)
Message-Id: <3mt5v3-oh7.ln1@osiris.mauzo.dyndns.org>
Quoth Martin =?iso-8859-1?Q?Ki=DFner?= <news@chaos-net.de>:
> Hello together,
>
> I have installed the modules DBI and DBD::mysql.
> When I try to connect to my MySQL database with this command:
>
> perl -e 'use DBI;use DBD::mysql;
> DBI->connect("DBI:mysql:databasename","username","password")'
>
> I get the following error:
>
> *** start error message ***
> dyld: lazy symbol binding failed: Symbol not found: _mysql_init
> Referenced from:
> /Library/Perl/5.8.6/darwin-thread-multi-2level/auto/DBD/mysql/mysql.bundle
> Expected in: dynamic lookup
>
> dyld: Symbol not found: _mysql_init
> Referenced from:
> /Library/Perl/5.8.6/darwin-thread-multi-2level/auto/DBD/mysql/mysql.bundle
> Expected in: dynamic lookup
You almost certainly don't have the mysql client libraries installed
correctly, or somehow you are picking up a different version from when
you built DBD::mysql.
Ben
--
I touch the fire and it freezes me, [benmorrow@tiscali.co.uk]
I look into it and it's black.
Why can't I feel? My skin should crack and peel---
I want the fire back... Buffy, 'Once More With Feeling'
------------------------------
Date: Mon, 2 Oct 2006 07:44:29 +0200
From: Martin =?iso-8859-1?Q?Ki=DFner?= <news@chaos-net.de>
Subject: Re: Problems with DBI and DBD::mysql (on Mac OS X 10.4, Intel)
Message-Id: <slrnei19pt.9dj.news@maki.homeunix.net>
Ben Morrow wrote :
>
> You almost certainly don't have the mysql client libraries installed
> correctly, or somehow you are picking up a different version from when
> you built DBD::mysql.
Okay, thank you for this information.
But still I don't know, how I can fix this.
I have read the installation instructions for DBI::mysql but I have to
admit that I do not understand too much of it.
Greetings
Martin
--
perl -e '$S=[[73,116,114,115,31,96],[108,109,114,102,99,112],
[29,77,98,111,105,29],[100,93,95,103,97,110]];
for(0..3){for$s(0..5){print(chr($S->[$_]->[$s]+$_+1))}}'
------------------------------
Date: Mon, 02 Oct 2006 06:33:23 GMT
From: David Harmon <source@netcom.com>
Subject: Re: Tk- getOpenFile sticks on W2K server
Message-Id: <4521a377.1867671@news.west.earthlink.net>
On Tue, 26 Sep 2006 10:20:05 GMT in comp.lang.perl.misc, zentara
<zentara@highstream.net> wrote,
>Well I use linux, and '/' is the top. All other disks have to be mounted
>somewhere on /.
>
>If you are using Windows, I don't know how they do it.
use Win32API::File ("getLogicalDrives");
@roots= getLogicalDrives()
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 9788
***************************************
