[30515] in Perl-Users-Digest
Perl-Users Digest, Issue: 1758 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Aug 4 17:47:45 2008
Date: Fri, 1 Aug 2008 03:09:41 -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 Fri, 1 Aug 2008 Volume: 11 Number: 1758
Today's topics:
Re: && is not an lvalue <ben@morrow.me.uk>
Re: && is not an lvalue <mjcarman@mchsi.com>
Re: EPIC and "my" variables <rupert@web-ideas.com.au>
Re: EPIC and "my" variables <jurgenex@hotmail.com>
Re: Extracting bits out of huge numbers <blabla@dungeon.de>
Re: Extracting bits out of huge numbers <sisyphus359@gmail.com>
Re: Extracting bits out of huge numbers <rvtol+news@isolution.nl>
extracting double from a string <a@a.com>
Re: extracting double from a string <someone@example.com>
Re: FAQ 8.7 How do I clear the screen? <mlp@acm.org>
Help with Button Placements using TK <grahamjfeeley@optusnet.com.au>
Re: Help with Button Placements using TK <ben@morrow.me.uk>
Re: How come? RE matches, but does not set $^R <rvtol+news@isolution.nl>
Japanese Girl > Haruna Yabuki <aztnat@163.com>
new CPAN modules on Fri Aug 1 2008 (Randal Schwartz)
Re: PostgreSQL 8.3 working driver for ActivePerl/win? <u45183@uwe>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 31 Jul 2008 22:33:57 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: && is not an lvalue
Message-Id: <5nn9m5-8qj.ln1@osiris.mauzo.dyndns.org>
Quoth xhoster@gmail.com:
> It seems like almost everything in Perl is an lvalue. So why isn't the
> result of && an lvalue?
>
> I wanted to do this:
> ($h{$big}{$nasty}[$dereferencing]{operation($x)}{$done}[here(y)]and die)=6;
>
> Obviously, that just isn't the way perl was implemented. But is there a
> reason that "?:" yields an lvalue but && doesn't?
Perhaps because it's not entirely clear which operand would be returned
when both are true or both false? That doesn't apply to your case, of
course, since one of them is 'die' and can never be returned, but perl
doesn't know that.
Which one you actually get is rather confusing. If either is false, you
get that one; if both are false, you get the first; and if both are
true you get the second. || is the other way around: both false gives
the second operand, and both true the first. I suppose it makes sense
when you consider the short-circuiting.
Oddly, you *can* take a ref to the result of && (which is in fact an
lvalue), which means
${\( $x and die )} = 6;
*does* work as you expect, despite being hideously ugly.
Even stranger, while do { $x } returns $x (though of course you can't
assign to it directly), if the expression inside the 'do' gets too
complicated it starts returning a copy instead:
~% perl -le'print \do { $x }; print \$x'
SCALAR(0x8100be0)
SCALAR(0x8100be0)
~% perl -le'print \do { $x and 1 }; print \$x'
SCALAR(0x8100be0)
SCALAR(0x8100be0)
~% perl -le'print \do { $x and die }; print \$x'
SCALAR(0x810016c)
SCALAR(0x8100be0)
~% perl -le'print \do { $x; $x }; print \$x'
SCALAR(0x810016c)
SCALAR(0x8100be0)
The point at which it switches over appears to be when the do block gets
its own ENTER/LEAVE ops rather than just being a scope.
A clean way around the problem is to use Data::Alias:
use Data::Alias;
alias my $tmp = $h{......}
and die ...;
$tmp = 6;
Ben
--
All persons, living or dead, are entirely coincidental.
ben@morrow.me.uk Kurt Vonnegut
------------------------------
Date: Fri, 01 Aug 2008 00:03:24 GMT
From: Michael Carman <mjcarman@mchsi.com>
Subject: Re: && is not an lvalue
Message-Id: <gpskk.223872$TT4.43726@attbi_s22>
Ben Morrow wrote:
> Quoth xhoster@gmail.com:
>>
>> is there a reason that "?:" yields an lvalue but && doesn't?
>
> Perhaps because it's not entirely clear which operand would be
> returned when both are true or both false?
&& is defined to return the last thing evaluated. How is that not clear?
> Which one you actually get is rather confusing.
I don't think that the behavior of the operator isn't confusing at all.
Any code that makes use of that behavior is likely to be if only because
it's so rarely used.
-mjc
------------------------------
Date: Fri, 1 Aug 2008 02:08:48 -0700 (PDT)
From: rupert <rupert@web-ideas.com.au>
Subject: Re: EPIC and "my" variables
Message-Id: <324d25f5-d47e-46f7-a9a6-910c26f2946c@a2g2000prm.googlegroups.com>
My Linux system is as follows:
8.04 LTS Hardy 64bit
Perl v5.8.8 built for x86_64-linux-gnu-thread-multi
CPAN v1.9205 installed
Perl PadWalker v1.7 installed via CPAN
I'll look forward to any ideas you may have. Thanks!
------------------------------
Date: Fri, 01 Aug 2008 09:44:44 GMT
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: EPIC and "my" variables
Message-Id: <dim594dqaesu1gl0fcegd2b0c3luuq12id@4ax.com>
rupert <rupert@web-ideas.com.au> wrote:
>My Linux system is as follows:
>
>8.04 LTS Hardy 64bit
>Perl v5.8.8 built for x86_64-linux-gnu-thread-multi
>CPAN v1.9205 installed
>Perl PadWalker v1.7 installed via CPAN
>
>I'll look forward to any ideas you may have. Thanks!
Ideas about what topic or problem?
jue
------------------------------
Date: Thu, 31 Jul 2008 14:18:53 -0700 (PDT)
From: hofer <blabla@dungeon.de>
Subject: Re: Extracting bits out of huge numbers
Message-Id: <ebf021af-25b0-4dda-a7aa-2ff31a85fd08@x35g2000hsb.googlegroups.com>
Apologies,
I posted the same message to a German and en ENglish news group.
'bis' is the word I forgot to translate to Englisch :-( shame on me.
I wanted to extrect the bits 12 to 16, assuming, that the lsb is
numbereed 0
bye
H
On Jul 31, 6:55 am, bugbear <bugbear@trim_papermule.co.uk_trim> wrote:
> hofer wrote:
> > Hi Bugbear,
>
> > I'm not that gifted in explaining, but I t'll try.
>
> > First if your question concerns the representation of binary numbers:
> > Then look athttp://en.wikipedia.org/wiki/Binary_numeral_system
>
> I am familiar with multi precision and multi base concepts.
>
> >>Example Bits 16 bis 12 should result in 0b00001 == 0x1 == 1
> >> Bits 17 bis 12 should result in 0b100001 == 0x21 == 33
>
> what do you mean by
> "Bits 16 bis 12"
>
> and
>
> "Bit 17s bis 12"
>
> what is "bis" ?
>
> BugBear
------------------------------
Date: Thu, 31 Jul 2008 17:29:28 -0700 (PDT)
From: sisyphus <sisyphus359@gmail.com>
Subject: Re: Extracting bits out of huge numbers
Message-Id: <af6ca4dc-a46d-46ae-8b13-852097ac9a1e@u12g2000prd.googlegroups.com>
On Aug 1, 7:18=A0am, hofer <bla...@dungeon.de> wrote:
>
> I wanted to extrect the bits 12 to 16, assuming, that the lsb is
> numbereed 0
>
If it's the same bits each and every time, then a combination of
bitwise & and right-shifting (as already suggested) would be best:
$and =3D (2 ** 16) + (2 ** 15) + (2 ** 14) + (2 ** 13) + (2 ** 12);
for(@nums) {
$wanted =3D ($_ & $and) >> 12;
# do additional stuff
}
where both $wanted and the elements of @nums could be Math::BigInt or
Math::GMP or Math::Pari or Bit::Vector objects (to name a few
options). Each of those modules overloads both '&' and '>>', so the
above (untested) code should work as is - irrespective of which module
you use.
Cheers,
Rob
------------------------------
Date: Fri, 1 Aug 2008 11:10:28 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: Extracting bits out of huge numbers
Message-Id: <g6ur8g.1k8.1@news.isolution.nl>
sisyphus schreef:
> $and = (2 ** 16) + (2 ** 15) + (2 ** 14) + (2 ** 13) + (2 ** 12);
Or as Ben Morrow suggested:
my $mask = 0;
$mask |= 1 << $_ for 12 .. 16;
or just
my $mask = 0x0001_F000;
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: 1 Aug 2008 02:11:04 -0700
From: perlcoder <a@a.com>
Subject: extracting double from a string
Message-Id: <g6ujv8018qp@drn.newsguy.com>
We store an array of 32 doubles as a string in a database. When the data is
fetched
from the database it is first read to a char[257] and then converted to an array
of 32 double, by using C union.
Now we want to do the same in perl. We get the data from the database using DBI.
How do you convert from a $scalar to an array.
thanks
------------------------------
Date: Fri, 01 Aug 2008 09:58:48 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: extracting double from a string
Message-Id: <s7Bkk.107816$kx.8645@pd7urf3no>
perlcoder wrote:
> We store an array of 32 doubles as a string in a database. When the data is
> fetched
> from the database it is first read to a char[257] and then converted to an array
> of 32 double, by using C union.
>
> Now we want to do the same in perl. We get the data from the database using DBI.
> How do you convert from a $scalar to an array.
Either //g or split() or unpack()
perldoc perlop
perldoc -f split
perldoc -f unpack
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
------------------------------
Date: Fri, 01 Aug 2008 10:05:02 +1000
From: Mark L Pappin <mlp@acm.org>
Subject: Re: FAQ 8.7 How do I clear the screen?
Message-Id: <87sktp61n5.fsf@Don-John.Messina>
PerlFAQ Server <brian@stonehenge.com> writes:
> If you only have do so infrequently, use "system":
>
> system("clear");
Which of course only works on those systems with a 'clear' command
that does what you want.
This answer should be noted as being system-specific, and unless
there's a mechanism that works [almost-]everywhere Perl does, the
question should also be so noted.
> The perlfaq-workers also don't have access to every
> operating system or platform, so please include relevant details for
> corrections to examples that do not work on particular platforms.
> Working code is greatly appreciated.
On Windows-ish systems, where there is no 'clear' command, there is a
'cls' command; it has historically been users of these systems who
write programs that clear the screen (and ask how to do it in
language-specific newsgroups). Nowadays with windowing systems
ubiquitous and screen real-estate increasing, perhaps the answer
should be more like
Don't.
You really want to?
OK, clarify what you mean by "screen":
- a text window of fixed size?
- a text window of arbitrary, possibly variable, size?
- a graphical window?
- every pixel displayed on one monitor?
- every pixel displayed on every monitor in front of one user?
- something else?
Some of these are easy, some less so.
Some of these may be desirable, some less so.
mlp
------------------------------
Date: Fri, 1 Aug 2008 09:26:28 +1000
From: "Graham Feeley" <grahamjfeeley@optusnet.com.au>
Subject: Help with Button Placements using TK
Message-Id: <48924a2d$0$2271$afc38c87@news.optusnet.com.au>
Hi I am a Newbie and trying to get a menu to work.
I have place 3 buttons so far on a form, however I would like to know how to
place them where I want them.
EG: on this form I would like the buttons to be on the bottom of the form
and in one row????
Any help would be appreciative!!
------------------
#!/usr/bin/perl -w
# Display Hello World program
use diagnostics;
use Tk;
use strict;
use warnings;
my $font1 = "arial 10 bold";
my $font2 = "courier 12 bold";
my $mw = MainWindow->new;
$mw->geometry("1024x512");
$mw->title("GUI Test");
my $frame1 = $mw->Frame(-width=>1024,
-height=>128,
-relief=>"raised")->grid();
my $btn1 = $mw->Button(-text=>"Exit",
-font=>$font2,
-width=>9, # width of the button in screen
units
-height=>3, # height of the button in screen
units
-relief=>"raised", # raised solid ridge sunken flat
groove
-state=>"normal", # normal active or disabled
-command =>sub{exit})
->grid( -pady=>10);
my $btn2 = $mw->Button(-text=>"Btn2",
-font=>$font2,
-width=>9, # width of the button in screen units
-height=>3, # height of the button in screen units
-relief=>"raised", # raised solid ridge sunken flat groove
-state=>"normal", # normal active or disabled
-command =>sub{exit})
->grid( -pady=>10);
my $btn3 = $mw->Button(-text=>"Btn3",
-font=>$font2,
-width=>9, # width of the button in screen units
-height=>3, # height of the button in screen units
-relief=>"raised", # raised solid ridge sunken flat groove
-state=>"normal", # normal active or disabled
-command =>sub{exit})
->grid( -pady=>10);
MainLoop;
------------------------------
Date: Fri, 1 Aug 2008 01:26:28 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: Help with Button Placements using TK
Message-Id: <kq1am5-4bp.ln1@osiris.mauzo.dyndns.org>
Quoth "Graham Feeley" <grahamjfeeley@optusnet.com.au>:
> Hi I am a Newbie and trying to get a menu to work.
> I have place 3 buttons so far on a form, however I would like to know how to
> place them where I want them.
> EG: on this form I would like the buttons to be on the bottom of the form
> and in one row????
I generally find it easier to use the 'pack' geometry manager than
'grid'. You also really need to sort out your indentation, and use
variables and loops to avoid saying the same thing over and over.
Something like this should get you started:
#!/usr/bin/perl -w
# Display Hello World program
use diagnostics;
use Tk;
use strict;
use warnings;
my $font2 = "courier 12 bold";
my $mw = MainWindow->new;
$mw->geometry("1024x512");
$mw->title("GUI Test");
my @BTN = (
-font=>$font2,
-width=>9, # width of the button in screen units
-height=>3, # height of the button in screen units
-relief=>"raised", # raised solid ridge sunken flat groove
-state=>"normal", # normal active or disabled
);
my @btns = (
[ Exit => sub { exit } ],
[ Btn2 => sub { exit } ],
[ Btn3 => sub { exit } ],
);
for (@btns) {
my ($txt, $sub) = @$_;
$mw->Button(
@BTN,
-text => $txt,
-command => $sub,
)->pack(
-side => 'left',
-padx => 10,
-pady => 10,
-anchor => 's',
);
}
MainLoop;
__END__
Ben
--
I touch the fire and it freezes me, [ben@morrow.me.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... BtVS, 'Once More With Feeling'
------------------------------
Date: Thu, 31 Jul 2008 23:27:24 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: How come? RE matches, but does not set $^R
Message-Id: <g6ti0e.bs.1@news.isolution.nl>
Hartmut Camphausen schreef:
> Assume the following REs:
>
> # this should match B, followed by e.g. '=cc', and set $^R to 'got
> B': /(B(?:=c*))(?{'got B'})/
>
> # so should this, but match '=c*' only once, if any, and set $^R:
> /(B(?:=c*)?)(?{'got B'})/
>
> Both expressions match as expected (and set $1), BUT: the second one
> does n o t set $^R as it should do.
>
> However, if I say
>
> /(?>(B(?:=c+)?)(?{...})/
>
> i.e. force Perl to eat up anything it matches, $^R is correctly set.
>
> How come?
Most probably a bug: if there is a quantifier at the end of the
non-capturing group, and a quantifier directly after that group, then
$^R is undefined.
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Thu, 31 Jul 2008 13:28:55 -0700 (PDT)
From: azt <aztnat@163.com>
Subject: Japanese Girl > Haruna Yabuki
Message-Id: <77ab94d6-69df-45b7-b8d2-960e5b299be5@a6g2000prm.googlegroups.com>
Born: 18 December 1984 in Tokyo, Japan, Haruna Yabuki: Japanese Idol,
Model. Profession: Idol, Model. Height: 163cm. Measurements: Bust:
86cm, Waist: 58cm
http://qqgirl.110mb.com/Japanese%20Girl/Haruna%20Yabuki/index.html
------------------------------
Date: Fri, 1 Aug 2008 04:42:21 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Fri Aug 1 2008
Message-Id: <K4wnqL.o9y@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.
API-Plesk-1.07
http://search.cpan.org/~nrg/API-Plesk-1.07/
OOP interface to the Plesk XML API (http://www.parallels.com/en/products/plesk/).
----
API-PleskExpand-1.06
http://search.cpan.org/~nrg/API-PleskExpand-1.06/
OOP interface to the Plesk Expand XML API (http://www.parallels.com/en/products/plesk/expand/).
----
Amazon-SQS-Simple-0.8
http://search.cpan.org/~swhitaker/Amazon-SQS-Simple-0.8/
OO API for accessing the Amazon Simple Queue Service
----
Carp-Undead-0.00001
http://search.cpan.org/~nishikawa/Carp-Undead-0.00001/
override die function nad warn function;
----
Cisco-Abbrev-0.01
http://search.cpan.org/~kbrint/Cisco-Abbrev-0.01/
Translate to/from Cisco Interface Abbreviations
----
Config-Augeas-0.203
http://search.cpan.org/~ddumont/Config-Augeas-0.203/
Edit configuration files through Augeas C library
----
Crypt-Juniper-0.02
http://search.cpan.org/~kbrint/Crypt-Juniper-0.02/
Encrypt/decrypt Juniper $9$ secrets
----
Crypt-PBC-0.7.20.3.4.18
http://search.cpan.org/~jettero/Crypt-PBC-0.7.20.3.4.18/
OO interface for the Stanford PBC library
----
Devel-FindBlessedRefs-1.1.3
http://search.cpan.org/~jettero/Devel-FindBlessedRefs-1.1.3/
find all refs blessed under a package
----
FLV-Info-0.19
http://search.cpan.org/~cdolan/FLV-Info-0.19/
Extract metadata from Macromedia Flash Video files
----
Fey-0.09
http://search.cpan.org/~drolsky/Fey-0.09/
Better SQL Generation Through Perl
----
Graphics-Color-0.07
http://search.cpan.org/~gphat/Graphics-Color-0.07/
Device and library agnostic color spaces.
----
IO-Lambda-0.21
http://search.cpan.org/~karasik/IO-Lambda-0.21/
non-blocking I/O in lambda style
----
JSON-DWIW-0.26
http://search.cpan.org/~dowens/JSON-DWIW-0.26/
JSON converter that Does What I Want
----
Net-LDAP-Batch-0.02
http://search.cpan.org/~karman/Net-LDAP-Batch-0.02/
perform a batch of LDAP actions
----
Net-LDAP-Class-0.07
http://search.cpan.org/~karman/Net-LDAP-Class-0.07/
object-relational mapper for Net::LDAP
----
Net-LDAP-Server-Test-0.07
http://search.cpan.org/~karman/Net-LDAP-Server-Test-0.07/
test Net::LDAP code
----
Net-Pcap-Easy-1.2
http://search.cpan.org/~jettero/Net-Pcap-Easy-1.2/
Net::Pcap is awesome, but it's difficult to bootstrap
----
Net-Whois-Raw-1.56
http://search.cpan.org/~despair/Net-Whois-Raw-1.56/
Get Whois information for domains
----
OpenResty-0.3.20
http://search.cpan.org/~agent/OpenResty-0.3.20/
General-purpose web service platform for web applications
----
POE-Component-Client-Whois-Smart-0.13
http://search.cpan.org/~nrg/POE-Component-Client-Whois-Smart-0.13/
Provides very quick WHOIS queries with smart features.
----
POE-Component-IRC-Plugin-BasePoCoWrap-0.003
http://search.cpan.org/~zoffix/POE-Component-IRC-Plugin-BasePoCoWrap-0.003/
base talking/ban/trigger functionality for plugins using POE::Component::*
----
POE-Component-IRC-Plugin-WWW-Alexa-TrafficRank-0.0101
http://search.cpan.org/~zoffix/POE-Component-IRC-Plugin-WWW-Alexa-TrafficRank-0.0101/
get traffic rank for pages via your IRC bot
----
POSIX-Regex-0.90.16
http://search.cpan.org/~jettero/POSIX-Regex-0.90.16/
OO interface for the gnu regex engine
----
Padre-0.03_01
http://search.cpan.org/~szabgab/Padre-0.03_01/
Perl Application Development and Refactoring Environment
----
Parse-AccessLogEntry-Accessor-0.01
http://search.cpan.org/~amarisan/Parse-AccessLogEntry-Accessor-0.01/
adds accessors to Parse::AccessLogEntry module.
----
Pg-Loader-0.08
http://search.cpan.org/~ioannis/Pg-Loader-0.08/
Perl extension for loading Postgres tables
----
Pod-Server-1.06
http://search.cpan.org/~beppu/Pod-Server-1.06/
a web server for locally installed perl documentation
----
RDF-Trine-0.109_01
http://search.cpan.org/~gwilliams/RDF-Trine-0.109_01/
An RDF Framework for Perl.
----
Rose-DBx-Garden-Catalyst-0.09_03
http://search.cpan.org/~karman/Rose-DBx-Garden-Catalyst-0.09_03/
plant Roses in your Catalyst garden
----
Rose-DBx-Object-Renderer-0.23
http://search.cpan.org/~danny/Rose-DBx-Object-Renderer-0.23/
Web UI Rendering for Rose::DB::Object
----
SWF-NeedsRecompile-1.06
http://search.cpan.org/~cdolan/SWF-NeedsRecompile-1.06/
Tests if any SWF or FLA file dependencies have changed
----
Squatting-0.50
http://search.cpan.org/~beppu/Squatting-0.50/
A Camping-inspired Web Microframework for Perl
----
TAP-Harness-JUnit-0.20
http://search.cpan.org/~lkundrak/TAP-Harness-JUnit-0.20/
Generate JUnit compatible output from TAP results
----
Test-Perl-Metrics-Simple-0.1
http://search.cpan.org/~koga/Test-Perl-Metrics-Simple-0.1/
Use Perl::Metrics::Simple in test programs
----
Tree-RedBlack-0.4
http://search.cpan.org/~bholzman/Tree-RedBlack-0.4/
Perl implementation of Red/Black tree, a type of balanced tree.
----
Tree-RedBlack-0.5
http://search.cpan.org/~bholzman/Tree-RedBlack-0.5/
Perl implementation of Red/Black tree, a type of balanced tree.
----
Win32-OLE-CrystalRuntime-Application-0.05
http://search.cpan.org/~mrdvt/Win32-OLE-CrystalRuntime-Application-0.05/
Perl Interface to the CrystalRuntime.Application OLE Object
----
XML-Grammar-Fortune-0.0102
http://search.cpan.org/~shlomif/XML-Grammar-Fortune-0.0102/
convert the FortunesXML grammar to other formats and from plaintext.
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/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
------------------------------
Date: Fri, 01 Aug 2008 08:47:50 GMT
From: "zachdavis23" <u45183@uwe>
Subject: Re: PostgreSQL 8.3 working driver for ActivePerl/win?
Message-Id: <8802d7d29baad@uwe>
Hi John,
I am trying, with no success, to install a working combination of
PostgreSQL+ActivePerl+DBI+DBD-Pg on my XP SP2 machine.
Would you be so kind to share the versions of your components?
PostgreSQL: _______________________
ActivePerl: ActivePerl-5.8.8.822-MSWin32-x86-280952
DBI: ______________________________
DBD-Pg: __________________________
Thank you much,
Zach
John Bokma wrote:
>> Today I installed PostgreSQL 8.3 on a computer running XP
>> Professional, but still no luck in installing a working DBD::Pg
>[quoted text clipped - 8 lines]
>> :
>> Binary build 820 [274739] provided by ActiveState
>
>Upgrading to
>
>This is perl, v5.8.8 built for MSWin32-x86-multi-thread
>(with 18 registered patches, see perl -V for more detail)
>:
>Binary build 822 [280952] provided by ActiveState
>http://www.ActiveState.com
>Built Jul 31 2007 19:34:48
>
>did the trick.
>
------------------------------
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 V11 Issue 1758
***************************************
