From jarich at perltraining.com.au  Fri Jul  3 01:03:01 2009
From: jarich at perltraining.com.au (Jacinta Richardson)
Date: Fri, 03 Jul 2009 18:03:01 +1000
Subject: [Melbourne-pm] Next meeting: Wednesday 8th July
Message-ID: <4A4DBB35.8000307@perltraining.com.au>

G'day folk,

Just a reminder that our next meeting is next week on Wednesday 8th July.  Paul
and I are thinking of practising our OSCON talks so you'll probably get to see
some of the community one I mentioned last time; and a sneak preview into some
of what will become our Enterprise Perl course.

Please consider whether you can be convinced to speak at the August meeting
(12th) as Paul and I will be away and not even sending announcements or anything
like that.

See you next week!

	J


-- 
   ("`-''-/").___..--''"`-._          |  Jacinta Richardson         |
    `6_ 6  )   `-.  (     ).`-.__.`)  |  Perl Training Australia    |
    (_Y_.)'  ._   )  `._ `. ``-..-'   |      +61 3 9354 6001        |
  _..`--'_..-_/  /--'_.' ,'           | contact at perltraining.com.au |
 (il),-''  (li),'  ((!.-'             |   www.perltraining.com.au   |

From pjf at perltraining.com.au  Tue Jul  7 23:46:11 2009
From: pjf at perltraining.com.au (Paul Fenwick)
Date: Wed, 08 Jul 2009 16:46:11 +1000
Subject: [Melbourne-pm] Reminder: Meeting TONIGHT at 6:30pm
Message-ID: <4A5440B3.1000305@perltraining.com.au>

   When:   Wednesday, TONIGHT, 6:30pm

   Where:  Remasys Pty Ltd
           Level 1
           180 Flinders St
           MELBOURNE VIC 3121

   What:   Serving the community, one argument at a time -- jarich
           Software deployment with git -- alecthegeek
           Perl news and gossip -- pjf

== Serving the community, one argument at a time -- Jacinta Richardson ==

The president of your committee is doing most of the work and none of the
management. The secretary hasn't written the minutes for any of the meetings
for the last 6 months (you wrote the last 4 agendas). The treasurer can't
access the bank account, and you haven't heard from your publicity officer
since you started planning the big event. Welcome to the fun of volunteer
communities!

== Software deployment with git -- Alec Clews ==

When deploying files into commercial environments it is vital to document
and audit the deployment of files across multiple application instances.

This paper presents a working example that addresses some of the major
issues relating to deployment such as automation, access control, logging
and change auditing.

Traditionally the git version control tool is used to manage development
source code and as a delivery point for other tools such as such Capistrano
or Puppet. However current deployment and system management frameworks often
use a specialist domain language or pidgin which can make them more complex
to deploy. Some tools also require the implementation of classes to perform
specific actions. Using git with a number of simple wrapper scripts can
greatly simplify the deployment implementation. In a system management
environment this effort is worthwhile, but for application deployment it is
often too much complex.

After attending this presentation attendees will be able to implement a
similar git based approach elsewhere in any modern scripting language or
framework.

== Perl news and gossip - Paul Fenwick ==

A secret release candidate[1] is out for Perl 5.10.0.  autodie 2.0 has been
released with a new hinting interface[2].  Rafael just resigned as bleadperl
pumpking[3], and Perl 5.11.0 (dev) and by inference 5.12.0 (stable) will
have strict on by default[4].

This session will be a chance to catch up on all the latest Perl news and
gossip.

Cheerio,

	Paul

[1]http://www.nntp.perl.org/group/perl.perl5.porters/2009/07/msg148270.html
[2]http://pjf.id.au/blog/?position=577
[3]http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2009-07/msg00193.html
[4]http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2009-07/msg00309.html

-- 
Paul Fenwick <pjf at perltraining.com.au> | http://perltraining.com.au/
Director of Training                   | Ph:  +61 3 9354 6001
Perl Training Australia                | Fax: +61 3 9354 2681

From alec.clews at gmail.com  Wed Jul  8 04:45:22 2009
From: alec.clews at gmail.com (Alec Clews)
Date: Wed, 8 Jul 2009 21:45:22 +1000
Subject: [Melbourne-pm] Git training resources
Message-ID: <3c2b63c00907080445s6f09a056yeca649220249846d@mail.gmail.com>

As per the question at tonight's meeting, here are some suggestions on
learning Git

Learning Material

   - View the video and material at
*http://learn.github.com/p/intro.html*<http://learn.github.com/p/intro.html>.
Follow through the examples in this, and all future, module text and
   perform them on your Cygwin environment. Without duplicating the examples
   for yourself you are unlikely to learn effectively.
   - Start reading the material at *http://www.newartisans.com
   /blog_assets/git.from.bottom.up.pdf*<http://www.newartisans.com/blog_assets/git.from.bottom.up.pdf>This
should be an ongoing activity and will explain some of the Git
   internals
   - Continue with
*http://learn.github.com/p/setup.html*<http://learn.github.com/p/setup.html>
   .
      - In order to clone a remote repository as per the examples. At the
      bash prompt run the following commands
      - A) export http_proxy=http://OCEANIA\\ <http://oceania%5c%5c/>
      <networkname>:<networkpassword>@proxy.anz:80 (e.g. http_proxy=
      http://OCEANIA\\clewsa:SecreatSaucey69 at proxy.anz:80<http://OCEANIA%5C%5Cclewsa:SecreatSaucey69 at proxy.anz/>
      )
      - B)  git clone
*http://github.com/alecclews/vcbuilding.git*<http://github.com/alecclews/vcbuilding.git>
        (you can of course use any valid git URL you want, I offer this an
      example you can use of you wish)
   - Continue with the modules
*http://learn.github.com/p/normal.html*<http://learn.github.com/p/normal.html>,
   *http://learn.github.com/p/branching.html*<http://learn.github.com/p/branching.html>,
   *http://learn.github.com/p/tagging.html*<http://learn.github.com/p/tagging.html>,
   *http://learn.github.com/p/log.html* <http://learn.github.com/p/log.html>,
   *http://learn.github.com/p/diff.html*<http://learn.github.com/p/diff.html>and
   *http://learn.github.com/p/undoing.html*<http://learn.github.com/p/undoing.html>


Useful sources of information:

   - Main Git site (*http://git-scm.com/* <http://git-scm.com/>)
   - Official Git tutorial (*
   http://www.kernel.org/pub/software/scm/git/docs/v1.5.4.5/tutorial.html*<http://www.kernel.org/pub/software/scm/git/docs/v1.5.4.5/tutorial.html>
   )
   - Alec's personal Git links
(*http://delicious.com/alecclews/git*<http://delicious.com/alecclews/git>
   )



-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090708/61768043/attachment.html>

From alec.clews at gmail.com  Wed Jul  8 04:53:56 2009
From: alec.clews at gmail.com (Alec Clews)
Date: Wed, 8 Jul 2009 21:53:56 +1000
Subject: [Melbourne-pm] Git training resources
In-Reply-To: <3c2b63c00907080445s6f09a056yeca649220249846d@mail.gmail.com>
References: <3c2b63c00907080445s6f09a056yeca649220249846d@mail.gmail.com>
Message-ID: <3c2b63c00907080453t4b61d17aie024cff0714cb667@mail.gmail.com>

Sorry -- wrong info sent out. Corrections below

On Wed, Jul 8, 2009 at 21:45, Alec Clews <alec.clews at gmail.com> wrote:

> As per the question at tonight's meeting, here are some suggestions on
> learning Git
>
> Learning Material
>
>    - View the video and material at *http://learn.github.com/p/intro.html*<http://learn.github.com/p/intro.html>. Follow through the examples in this, and all future, module text and
>    perform them on your environment. Without duplicating the examples for
>    yourself you are unlikely to learn effectively.
>    - Start reading the material at *http://www.newartisans.com
>    /blog_assets/git.from.bottom.up.pdf*<http://www.newartisans.com/blog_assets/git.from.bottom.up.pdf>This should be an ongoing activity and will explain some of the Git
>    internals
>    - Continue with *http://learn.github.com/p/setup.html*<http://learn.github.com/p/setup.html>
>    .
>       - git clone *http://github.com/alecclews/vcbuilding.git*<http://github.com/alecclews/vcbuilding.git>
>         (you can of course use any valid git URL you want, I offer this an
>       example you can use of you wish)
>    - Continue with the modules *http://learn.github.com/p/normal.html*<http://learn.github.com/p/normal.html>,
>    *http://learn.github.com/p/branching.html*<http://learn.github.com/p/branching.html>,
>    *http://learn.github.com/p/tagging.html*<http://learn.github.com/p/tagging.html>,
>    *http://learn.github.com/p/log.html*<http://learn.github.com/p/log.html>,
>    *http://learn.github.com/p/diff.html*<http://learn.github.com/p/diff.html>and
>    *http://learn.github.com/p/undoing.html*<http://learn.github.com/p/undoing.html>
>
>
> Useful sources of information:
>
>    - Main Git site (*http://git-scm.com/* <http://git-scm.com/>)
>    - Official Git tutorial (*
>    http://www.kernel.org/pub/software/scm/git/docs/v1.5.4.5/tutorial.html*<http://www.kernel.org/pub/software/scm/git/docs/v1.5.4.5/tutorial.html>
>    )
>    - Alec's personal Git links (*http://delicious.com/alecclews/git*<http://delicious.com/alecclews/git>
>    )
>
>
>
> --
> Alec Clews
> Personal <alec.clews at gmail.com>             Melbourne, Australia.
> Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
> blog:http://alecthegeek.wordpress.com/
>



-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090708/c2a19186/attachment.html>

From alec.clews at gmail.com  Wed Jul  8 20:01:23 2009
From: alec.clews at gmail.com (Alec Clews)
Date: Thu, 9 Jul 2009 13:01:23 +1000
Subject: [Melbourne-pm] GIt and Openoffice
Message-ID: <3c2b63c00907082001p697f2a18kd45a87c4479bceff@mail.gmail.com>

This is not quiet the question @pjf asked last night, but still it shows how
you can integrate OpenOffice docs with Git

http://git.or.cz/gitwiki/GitTips#HowtousegittotrackOpenDocument.28OpenOffice.2CKoffice.29files.3F

-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090709/3b63ef8d/attachment.html>

From Martin.G.Ryan at team.telstra.com  Wed Jul  8 21:33:26 2009
From: Martin.G.Ryan at team.telstra.com (Ryan, Martin G)
Date: Thu, 9 Jul 2009 14:33:26 +1000
Subject: [Melbourne-pm] Git training resources
In-Reply-To: <3c2b63c00907080453t4b61d17aie024cff0714cb667@mail.gmail.com>
References: <3c2b63c00907080445s6f09a056yeca649220249846d@mail.gmail.com>
	<3c2b63c00907080453t4b61d17aie024cff0714cb667@mail.gmail.com>
Message-ID: <589EE331794E0B4DA62A9ADE89BCB4057CA0AE7AC6@WSMSG3103V.srv.dir.telstra.com>

 
Alec,

> As per the question at tonight's meeting, here are some suggestions on learning Git
> ...

As the guy who asked the question and given that most of the others present are 
already familiar with git, thank you very much for the pointers.

Cheers,
Martin

From alec.clews at gmail.com  Wed Jul  8 23:07:57 2009
From: alec.clews at gmail.com (Alec Clews)
Date: Thu, 9 Jul 2009 16:07:57 +1000
Subject: [Melbourne-pm] GIt and Openoffice
In-Reply-To: <3c2b63c00907082001p697f2a18kd45a87c4479bceff@mail.gmail.com>
References: <3c2b63c00907082001p697f2a18kd45a87c4479bceff@mail.gmail.com>
Message-ID: <3c2b63c00907082307x5147fb57j1abcb9527f270548@mail.gmail.com>

I owe @pjf an apology.

Whilst you can use the approach below to show Openoffice diffs, there is no
documented command line option in OpenOffice to allow it work as a merge
tool, so you cannot create a Git customised merge driver :-(.




On Thu, Jul 9, 2009 at 13:01, Alec Clews <alec.clews at gmail.com> wrote:

> This is not quiet the question @pjf asked last night, but still it shows
> how you can integrate OpenOffice docs with Git
>
>
> http://git.or.cz/gitwiki/GitTips#HowtousegittotrackOpenDocument.28OpenOffice.2CKoffice.29files.3F
>
> --
> Alec Clews
> Personal <alec.clews at gmail.com>             Melbourne, Australia.
> Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
> blog:http://alecthegeek.wordpress.com/
>



-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090709/dbc11942/attachment.html>

From alec.clews at gmail.com  Wed Jul 15 23:10:28 2009
From: alec.clews at gmail.com (Alec Clews)
Date: Thu, 16 Jul 2009 16:10:28 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
Message-ID: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>

G'Day,

Any thoughts on the best DBI reference for the desk? (web or dead tree
based)

Thanks

-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090716/2b578050/attachment.html>

From alfiejohn at gmail.com  Wed Jul 15 23:26:15 2009
From: alfiejohn at gmail.com (Alfie John)
Date: Thu, 16 Jul 2009 16:26:15 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
Message-ID: <bb79c8f30907152326n6c31fdd2l237ddd96a5447844@mail.gmail.com>

Hey Alec,

It's a bit old, but the Cheetah book is what you want. It's the ins and outs
of DBI:

  http://oreilly.com/catalog/9781565926998/

Once you know DBI however, you might want to start looking at using
something more convenient like Class::DBI, DBIx::Class or even roll your
own.

Alfie

On Thu, Jul 16, 2009 at 4:10 PM, Alec Clews <alec.clews at gmail.com> wrote:

> G'Day,
>
> Any thoughts on the best DBI reference for the desk? (web or dead tree
> based)
>
> Thanks
>
> --
> Alec Clews
> Personal <alec.clews at gmail.com>             Melbourne, Australia.
> Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
> blog:http://alecthegeek.wordpress.com/
>
> _______________________________________________
> Melbourne-pm mailing list
> Melbourne-pm at pm.org
> http://mail.pm.org/mailman/listinfo/melbourne-pm
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090716/f3151c76/attachment.html>

From daniel at rimspace.net  Wed Jul 15 23:34:18 2009
From: daniel at rimspace.net (Daniel Pittman)
Date: Thu, 16 Jul 2009 16:34:18 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	(Alec Clews's message of "Thu, 16 Jul 2009 16:10:28 +1000")
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
Message-ID: <878wipw2z9.fsf@rimspace.net>

Alec Clews <alec.clews at gmail.com> writes:

> Any thoughts on the best DBI reference for the desk? (web or dead tree
> based)

The manual page?

    man -Tps 3PM DBI | lp -D printer  # print a postscript version...

Of course, I think that is missing something in your question because that is
so obvious that you wouldn't ask it.

So, what do you actually /want/ from the DBI reference?

 - a summary of DBI methods?
 - how to use SQL through DBI directly?
 - a guide to using an SQL abstraction module?
 - a guide to effective SQL for MySQL, PgSQL, Oracle, or something else?
 - a guide to the "best" ORM for Perl?

Regards,
        Daniel
-- 
? Daniel Pittman            ? daniel at rimspace.net            ? +61 401 155 707
               ? made with 100 percent post-consumer electrons

From alecclews at gmail.com  Wed Jul 15 23:57:48 2009
From: alecclews at gmail.com (Alec Clews)
Date: Thu, 16 Jul 2009 16:57:48 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <878wipw2z9.fsf@rimspace.net>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
Message-ID: <3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>

On Thu, Jul 16, 2009 at 16:34, Daniel Pittman <daniel at rimspace.net> wrote:

> Alec Clews <alec.clews at gmail.com> writes:
>
> So, what do you actually /want/ from the DBI reference?
>
>  - a summary of DBI methods?
>  - how to use SQL through DBI directly?
>  - a guide to using an SQL abstraction module?
>  - a guide to effective SQL for MySQL, PgSQL, Oracle, or something else?
>  - a guide to the "best" ORM for Perl?
>
>

Good question.

I want a handy 'desk' reference with

a) Lots of examples
b) Easy to read and complete reference material

The reason is that I can't hold the details in my head (because I do not DBI
regularly) , but I need to keep knocking off dirty that little scripts that
run sql queries. I figure the easiest way for that is SQL via DBI rather
than an abstraction module.

Cheers

-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090716/a095dd81/attachment.html>

From daniel at rimspace.net  Thu Jul 16 00:08:09 2009
From: daniel at rimspace.net (Daniel Pittman)
Date: Thu, 16 Jul 2009 17:08:09 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	(Alec Clews's message of "Thu, 16 Jul 2009 16:57:48 +1000")
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
Message-ID: <874otdw1eu.fsf@rimspace.net>

Alec Clews <alecclews at gmail.com> writes:
> On Thu, Jul 16, 2009 at 16:34, Daniel Pittman <daniel at rimspace.net> wrote:
>> Alec Clews <alec.clews at gmail.com> writes:
>> 
>> So, what do you actually /want/ from the DBI reference?
>> 
>> ?- a summary of DBI methods?  ?- how to use SQL through DBI directly?  ?- a
>> guide to using an SQL abstraction module?  ?- a guide to effective SQL for
>> MySQL, PgSQL, Oracle, or something else?  ?- a guide to the "best" ORM for
>> Perl?
>> 
>
> Good question.
>
> I want a handy 'desk' reference with
>
> a) Lots of examples
> b) Easy to read and complete reference material
>
> The reason is that I can't hold the details in my head (because I do not DBI
> regularly), but I need to keep knocking off dirty that little scripts that
> run sql queries. I figure the easiest way for that is SQL via DBI rather
> than an abstraction module.

Well, raw DBI is pretty wordy, but is otherwise sensible.  I think what you
want is a good SQL reference, then, rather than DBI.  Well, or maybe a "cheat
sheet" derived from the manual page.

Once you have that there are, like, five statements you need from DBI in
general, so you probably won't find much in a book on it ... but plenty from
the "how do I achieve X in SQL" guide.

Regards,
        Daniel

->{connect,prepare_cached,execute,fetchrow_*,do} makes five.  Just.
-- 
? Daniel Pittman            ? daniel at rimspace.net            ? +61 401 155 707
               ? made with 100 percent post-consumer electrons

From alecclews at gmail.com  Thu Jul 16 00:18:04 2009
From: alecclews at gmail.com (Alec Clews)
Date: Thu, 16 Jul 2009 17:18:04 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <874otdw1eu.fsf@rimspace.net>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<874otdw1eu.fsf@rimspace.net>
Message-ID: <3c2b63c00907160018m9d782d1l8df037349af9d696@mail.gmail.com>

On Thu, Jul 16, 2009 at 17:08, Daniel Pittman <daniel at rimspace.net> wrote:

>
> Well, raw DBI is pretty wordy, but is otherwise sensible.  I think what you
> want is a good SQL reference, then, rather than DBI.  Well, or maybe a
> "cheat
> sheet" derived from the manual page.
>

The cheat sheet is a good idea -- writing that may help my remember as well
:-)

I'll post anything I create.

Cheers

-- 
Alec Clews
Personal <alec.clews at gmail.com>             Melbourne, Australia.
Jabber:  alecclews at jabber.org.au             PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090716/99429dd7/attachment.html>

From shlomif at iglu.org.il  Thu Jul 16 00:26:04 2009
From: shlomif at iglu.org.il (Shlomi Fish)
Date: Thu, 16 Jul 2009 10:26:04 +0300
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <bb79c8f30907152326n6c31fdd2l237ddd96a5447844@mail.gmail.com>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<bb79c8f30907152326n6c31fdd2l237ddd96a5447844@mail.gmail.com>
Message-ID: <200907161026.04770.shlomif@iglu.org.il>

On Thursday 16 July 2009 09:26:15 Alfie John wrote:
> Hey Alec,
>
> It's a bit old, but the Cheetah book is what you want. It's the ins and
> outs of DBI:
>
>   http://oreilly.com/catalog/9781565926998/
>
> Once you know DBI however, you might want to start looking at using
> something more convenient like Class::DBI, DBIx::Class or even roll your
> own.
>

Just a note - it's no longer recommended to use Class::DBI , as it was largely 
superseded by DBIx::Class, which is superior in any way, and much less buggy 
and kludgey. Even the Class::DBI originator recommends using DBIC instead.

There's a coverage of more options here:

http://blog.afoolishmanifesto.com/archives/822

And there's also Tangram, which is licensed under the GPL:

http://search.cpan.org/dist/Tangram/

Regards,

	Shlomi Fish

> Alfie
>

-- 
-----------------------------------------------------------------
Shlomi Fish       http://www.shlomifish.org/
"Humanity" - Parody of Modern Life - http://xrl.us/bkeut

God gave us two eyes and ten fingers so we will type five times as much as we
read.

From sam at nipl.net  Thu Jul 16 00:38:51 2009
From: sam at nipl.net (Sam Watkins)
Date: Thu, 16 Jul 2009 15:38:51 +0800
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com><878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
Message-ID: <1247729931.15383.1325312937@webmail.messagingengine.com>

> I want a handy 'desk' reference with
>
> a) Lots of examples
> b) Easy to read and complete reference material
>
> The reason is that I can't hold the details in my head (because I do
> not DBI regularly) , but I need to keep knocking off dirty that little
> scripts that run sql queries. I figure the easiest way for that is SQL
> via DBI rather than an abstraction module.

Here is a little "handy desk reference" for you, covering all of DBI
that you should use.  It is shorter than the manpage or a book ;)

my $dbh =
DBI->connect("DBI:mysql:database=$database;host=$hostname;port=$port",
$username, $password);
my $sth = $dbh->prepare("SELECT foo, bar FROM baz WHERE foo = ? AND bar
= ?");
$sth->execute("foovalue", $barvalue);
while (my $row = $sth->fetchrow_arrayref) {
  my ($foo, $bar) = @$row;
  print "$foo  $bar\n";
}
$sth->finish;


You should rarely need to use anything other than the above from DBI. 
keep it simple!

I highly recommend using the "bind values" stuff with the ?s in the SQL
and corresponding parameters to execute.  DBI will quote and escape
values for you correctly so you don't need to worry about SQL injection
attacks, etc.

DBI has umpteen different fetch methods, your life will be easier if you
just use one of them.

regards,

Sam

From daniel at rimspace.net  Thu Jul 16 00:52:29 2009
From: daniel at rimspace.net (Daniel Pittman)
Date: Thu, 16 Jul 2009 17:52:29 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <1247729931.15383.1325312937@webmail.messagingengine.com> (Sam
	Watkins's message of "Thu, 16 Jul 2009 15:38:51 +0800")
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
Message-ID: <87ocrluksi.fsf@rimspace.net>

"Sam Watkins" <sam at nipl.net> writes:

>> I want a handy 'desk' reference with
>>
>> a) Lots of examples
>> b) Easy to read and complete reference material
>>
>> The reason is that I can't hold the details in my head (because I do
>> not DBI regularly) , but I need to keep knocking off dirty that little
>> scripts that run sql queries. I figure the easiest way for that is SQL
>> via DBI rather than an abstraction module.
>
> Here is a little "handy desk reference" for you, covering all of DBI
> that you should use.  It is shorter than the manpage or a book ;)
>
> my $dbh =
> DBI->connect("DBI:mysql:database=$database;host=$hostname;port=$port",
> $username, $password);

DBI->connect(..., $password, { AutoCommit => 1, RaiseError => 1 });

AutoCommit == 1 means no transactions by default; without that the default is
randomly selected based on the database driver.  If you want a transaction,
explicitly use one.

RaiseError == 1 means to "die" rather than return undef on an actual error;
this makes it much safer to ignore error checking in your code.


> my $sth = $dbh->prepare("SELECT foo, bar FROM baz WHERE foo = ? AND bar
> = ?");

I prefer to encourage "prepare_cached", which saves computation if the same
statement is used multiple times, and costs little enough if it is used only
once, at the scale being discussed.

Either works, though.

> $sth->execute("foovalue", $barvalue);
> while (my $row = $sth->fetchrow_arrayref) {
>   my ($foo, $bar) = @$row;
>   print "$foo  $bar\n";
> }
> $sth->finish;
>
> You should rarely need to use anything other than the above from DBI.
> keep it simple!

$dbh->do("UPDATE table SET foo = ?", undef, "foovalue");


> I highly recommend using the "bind values" stuff with the ?s in the SQL
> and corresponding parameters to execute.  DBI will quote and escape
> values for you correctly so you don't need to worry about SQL injection
> attacks, etc.

*nod*

> DBI has umpteen different fetch methods, your life will be easier if you
> just use one of them.

*nod*  I usually encourage fetchrow_hashref, which is easier to use because it
is order-independent at the cost of extra CPU use, but any single choice
works.

Regards,
        Daniel

-- 
? Daniel Pittman            ? daniel at rimspace.net            ? +61 401 155 707
               ? made with 100 percent post-consumer electrons

From tim.evans at sputnikagency.com  Thu Jul 16 00:57:25 2009
From: tim.evans at sputnikagency.com (Tim Evans)
Date: Thu, 16 Jul 2009 17:57:25 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <1247729931.15383.1325312937@webmail.messagingengine.com>
Message-ID: <C6851A85.35CD%tim.evans@sputnikagency.com>

I would add to sam's list ...

        $dbh->{mysql_enable_utf8} or die "couldn't init mysql_enable_utf8";

And as long as the db is set  up to support utf8

        $dbh->do("SET character_set_database=utf8");
        $dbh->do("SET character_set_server=utf8");
        $dbh->do("SET names 'utf8'");
        etc.....


On 16/07/09 5:38 PM, "Sam Watkins" <sam at nipl.net> wrote:

>> I want a handy 'desk' reference with
>> 
>> a) Lots of examples
>> b) Easy to read and complete reference material
>> 
>> The reason is that I can't hold the details in my head (because I do
>> not DBI regularly) , but I need to keep knocking off dirty that little
>> scripts that run sql queries. I figure the easiest way for that is SQL
>> via DBI rather than an abstraction module.
> 
> Here is a little "handy desk reference" for you, covering all of DBI
> that you should use.  It is shorter than the manpage or a book ;)
> 
> my $dbh =
> DBI->connect("DBI:mysql:database=$database;host=$hostname;port=$port",
> $username, $password);
> my $sth = $dbh->prepare("SELECT foo, bar FROM baz WHERE foo = ? AND bar
> = ?");
> $sth->execute("foovalue", $barvalue);
> while (my $row = $sth->fetchrow_arrayref) {
>   my ($foo, $bar) = @$row;
>   print "$foo  $bar\n";
> }
> $sth->finish;
> 
> 
> You should rarely need to use anything other than the above from DBI.
> keep it simple!
> 
> I highly recommend using the "bind values" stuff with the ?s in the SQL
> and corresponding parameters to execute.  DBI will quote and escape
> values for you correctly so you don't need to worry about SQL injection
> attacks, etc.
> 
> DBI has umpteen different fetch methods, your life will be easier if you
> just use one of them.
> 
> regards,
> 
> Sam
> _______________________________________________
> Melbourne-pm mailing list
> Melbourne-pm at pm.org
> http://mail.pm.org/mailman/listinfo/melbourne-pm


From alfiejohn at gmail.com  Thu Jul 16 04:16:41 2009
From: alfiejohn at gmail.com (Alfie John)
Date: Thu, 16 Jul 2009 21:16:41 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <C6851A85.35CD%tim.evans@sputnikagency.com>
References: <1247729931.15383.1325312937@webmail.messagingengine.com>
	<C6851A85.35CD%tim.evans@sputnikagency.com>
Message-ID: <bb79c8f30907160416l1abf5ca4pfe61708411a9f089@mail.gmail.com>

Hey all,

Sorry, I thought you were interested in some leasure time reading. The DBI
book is nice for that. If what you're really after is something like a ref
card, the SYNOPSIS of 'perldoc DBI' is probably all you need.

If what you're really after is cheap scripts and your data set isn't huge,
the easiest way is:

  my $rows = $dbh->selectall_arrayref( $query, undef, @values );

No prepare, bind or execute needed.

If you're ever interested in what's under the hood, the DBI source is
actually quiet readable. As for Class::DBI vs DBIx::Class, I won't rehash
the flamewar here. Saying that, going straight DBI vs ORM should really
depend on what you're doing. When you're mostly doing CRUD and accessing the
same tables over and over again, then ORM is definately the goer. But if
you're mostly doing custom queries and reporting and never repeating
yourself, I would lean more to straight SQL.

Alfie

On Thu, Jul 16, 2009 at 5:57 PM, Tim Evans <tim.evans at sputnikagency.com>wrote:

> I would add to sam's list ...
>
>        $dbh->{mysql_enable_utf8} or die "couldn't init mysql_enable_utf8";
>
> And as long as the db is set  up to support utf8
>
>        $dbh->do("SET character_set_database=utf8");
>        $dbh->do("SET character_set_server=utf8");
>        $dbh->do("SET names 'utf8'");
>        etc.....
>
>
> On 16/07/09 5:38 PM, "Sam Watkins" <sam at nipl.net> wrote:
>
> >> I want a handy 'desk' reference with
> >>
> >> a) Lots of examples
> >> b) Easy to read and complete reference material
> >>
> >> The reason is that I can't hold the details in my head (because I do
> >> not DBI regularly) , but I need to keep knocking off dirty that little
> >> scripts that run sql queries. I figure the easiest way for that is SQL
> >> via DBI rather than an abstraction module.
> >
> > Here is a little "handy desk reference" for you, covering all of DBI
> > that you should use.  It is shorter than the manpage or a book ;)
> >
> > my $dbh =
> > DBI->connect("DBI:mysql:database=$database;host=$hostname;port=$port",
> > $username, $password);
> > my $sth = $dbh->prepare("SELECT foo, bar FROM baz WHERE foo = ? AND bar
> > = ?");
> > $sth->execute("foovalue", $barvalue);
> > while (my $row = $sth->fetchrow_arrayref) {
> >   my ($foo, $bar) = @$row;
> >   print "$foo  $bar\n";
> > }
> > $sth->finish;
> >
> >
> > You should rarely need to use anything other than the above from DBI.
> > keep it simple!
> >
> > I highly recommend using the "bind values" stuff with the ?s in the SQL
> > and corresponding parameters to execute.  DBI will quote and escape
> > values for you correctly so you don't need to worry about SQL injection
> > attacks, etc.
> >
> > DBI has umpteen different fetch methods, your life will be easier if you
> > just use one of them.
> >
> > regards,
> >
> > Sam
> > _______________________________________________
> > Melbourne-pm mailing list
> > Melbourne-pm at pm.org
> > http://mail.pm.org/mailman/listinfo/melbourne-pm
>
> _______________________________________________
> Melbourne-pm mailing list
> Melbourne-pm at pm.org
> http://mail.pm.org/mailman/listinfo/melbourne-pm
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090716/bbd1cb3b/attachment.html>

From jarich at perltraining.com.au  Wed Jul 15 18:09:12 2009
From: jarich at perltraining.com.au (Jacinta Richardson)
Date: Thu, 16 Jul 2009 11:09:12 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
Message-ID: <4A5E7DB8.30403@perltraining.com.au>

Alec Clews wrote:

> Any thoughts on the best DBI reference for the desk? (web or dead tree 
> based)

You're welcome to one of our teaching copies of our databases course 
notes if you'd like.  Or you can print your own.  We haven't finished 
porting the notes over to using DBIx::Class as we got bogged down in 
rewriting that section for our upcoming Enterprise Perl course instead. 
However the ideas still hold, and the DBI stuff is correct.  :)

	J

From toby.corkindale at strategicdata.com.au  Thu Jul 16 17:52:52 2009
From: toby.corkindale at strategicdata.com.au (Toby Corkindale)
Date: Fri, 17 Jul 2009 10:52:52 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <C6851A85.35CD%tim.evans@sputnikagency.com>
References: <C6851A85.35CD%tim.evans@sputnikagency.com>
Message-ID: <4A5FCB64.8090003@strategicdata.com.au>

Tim Evans wrote:
> I would add to sam's list ...
> 
>         $dbh->{mysql_enable_utf8} or die "couldn't init mysql_enable_utf8";

I think you mean "$dbh->{mysql_enable_utf8} = 1;" here? Since it's off 
by default, wouldn't you always die?

Note that you should preferably set it in the connect options, rather 
than afterwards though. I think you can then avoid having to call the 
other SET.. commands  you listed afterwards. (But please test that 
before changing any production systems on my word! ;)


If you're using PostgreSQL, then you should be using the pg_enable_utf8 
option, of course.
New versions of DBD::Pg enable pg_server_prepare by default, but on 
older versions you might want to enable it yourself.
(Improves performance through precompiled/cached server-side prepared 
statements)

-Toby

From lsharpe at pacificwireless.com.au  Thu Jul 16 18:47:34 2009
From: lsharpe at pacificwireless.com.au (Leigh Sharpe)
Date: Fri, 17 Jul 2009 11:47:34 +1000
Subject: [Melbourne-pm] fetchrow_array() vs fetchrow_arrayref() WAS RE: Perl
	DBI reference recommendations
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com><878wipw2z9.fsf@rimspace.net><3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
Message-ID: <96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>

Hi All,

Sam's example earlier used this:
 
>while (my $row = $sth->fetchrow_arrayref) {
>  my ($foo, $bar) = @$row;
>  print "$foo  $bar\n";
>}

Is there any advantage to using fetchrow_arrayref() here, instead of:

while (my ($foo, $bar) = $sth->fetchrow_array()) {
  print "$foo  $bar\n";
}

The latter just 'feels' more intuitive to me, but am I missing something
here which makes a reference more applicable?

Leigh.

-----Original Message-----
From: melbourne-pm-bounces+lsharpe=pacificwireless.com.au at pm.org
[mailto:melbourne-pm-bounces+lsharpe=pacificwireless.com.au at pm.org] On
Behalf Of Sam Watkins
Sent: Thursday, 16 July 2009 5:39 PM
To: alec.clews at gmail.com; melbourne-pm at pm.org
Subject: Re: [Melbourne-pm] Perl DBI reference recommendations

> I want a handy 'desk' reference with
>
> a) Lots of examples
> b) Easy to read and complete reference material
>
> The reason is that I can't hold the details in my head (because I do 
> not DBI regularly) , but I need to keep knocking off dirty that little

> scripts that run sql queries. I figure the easiest way for that is SQL

> via DBI rather than an abstraction module.

Here is a little "handy desk reference" for you, covering all of DBI
that you should use.  It is shorter than the manpage or a book ;)

my $dbh =
DBI->connect("DBI:mysql:database=$database;host=$hostname;port=$port",
$username, $password);
my $sth = $dbh->prepare("SELECT foo, bar FROM baz WHERE foo = ? AND bar
= ?"); $sth->execute("foovalue", $barvalue); 
while (my $row = $sth->fetchrow_arrayref) {
  my ($foo, $bar) = @$row;
  print "$foo  $bar\n";
}
$sth->finish;


You should rarely need to use anything other than the above from DBI. 
keep it simple!

I highly recommend using the "bind values" stuff with the ?s in the SQL
and corresponding parameters to execute.  DBI will quote and escape
values for you correctly so you don't need to worry about SQL injection
attacks, etc.

DBI has umpteen different fetch methods, your life will be easier if you
just use one of them.

regards,

Sam
_______________________________________________
Melbourne-pm mailing list
Melbourne-pm at pm.org
http://mail.pm.org/mailman/listinfo/melbourne-pm

From daniel at rimspace.net  Thu Jul 16 21:24:41 2009
From: daniel at rimspace.net (Daniel Pittman)
Date: Fri, 17 Jul 2009 14:24:41 +1000
Subject: [Melbourne-pm] fetchrow_array() vs fetchrow_arrayref() WAS RE:
	Perl DBI reference recommendations
In-Reply-To: <96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
	(Leigh Sharpe's message of "Fri, 17 Jul 2009 11:47:34 +1000")
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
	<96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
Message-ID: <87tz1cey2e.fsf@rimspace.net>

"Leigh Sharpe" <lsharpe at pacificwireless.com.au> writes:
> Sam's example earlier used this:
>
>>while (my $row = $sth->fetchrow_arrayref) {
>>  my ($foo, $bar) = @$row;
>>  print "$foo  $bar\n";
>>}
>
> Is there any advantage to using fetchrow_arrayref() here, instead of:
>
> while (my ($foo, $bar) = $sth->fetchrow_array()) {
>   print "$foo  $bar\n";
> }

Not really, except the greater risk of using a scalar context and consequently
throwing away all but the first column.

Regards,
        Daniel

-- 
? Daniel Pittman            ? daniel at rimspace.net            ? +61 401 155 707
               ? made with 100 percent post-consumer electrons

From cas at taz.net.au  Thu Jul 16 23:45:18 2009
From: cas at taz.net.au (Craig Sanders)
Date: Fri, 17 Jul 2009 16:45:18 +1000
Subject: [Melbourne-pm] fetchrow_array() vs fetchrow_arrayref() WAS RE:
 Perl DBI reference recommendations
In-Reply-To: <96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
	<96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
Message-ID: <20090717064517.GA15107@taz.net.au>

On Fri, Jul 17, 2009 at 11:47:34AM +1000, Leigh Sharpe wrote:
> Sam's example earlier used this:
>  
> >while (my $row = $sth->fetchrow_arrayref) {
> >  my ($foo, $bar) = @$row;
> >  print "$foo  $bar\n";
> >}
> 
> Is there any advantage to using fetchrow_arrayref() here, instead of:
> 
> while (my ($foo, $bar) = $sth->fetchrow_array()) {
>   print "$foo  $bar\n";
> }
> 
> The latter just 'feels' more intuitive to me, but am I missing something
> here which makes a reference more applicable?

i tend to use fetchrow_hashref() or fetchall_hashref() - that way i can
use the sql column names to access the data and don't have to guess
which array element matches which field....and, more importantly, don't
have to renumber things when i add or remove a field to the select.


oh, and arrayref/hashref are almost certainly faster than the non-ref
versions, and use less memory - they return only a reference to the data
rather than the a copy of the entire data structure.

craig

-- 
craig sanders <cas at taz.net.au>

From scottp at dd.com.au  Thu Jul 16 23:49:37 2009
From: scottp at dd.com.au (Scott Penrose)
Date: Fri, 17 Jul 2009 16:49:37 +1000
Subject: [Melbourne-pm] fetchrow_array() vs fetchrow_arrayref() WAS RE:
	Perl DBI reference recommendations
In-Reply-To: <20090717064517.GA15107@taz.net.au>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
	<96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
	<20090717064517.GA15107@taz.net.au>
Message-ID: <D086BC64-1DD5-421A-AFFF-85ED5ABBD5A8@dd.com.au>


On 17/07/2009, at 4:45 PM, Craig Sanders wrote:
>
> i tend to use fetchrow_hashref() or fetchall_hashref() - that way i  
> can
> use the sql column names to access the data and don't have to guess
> which array element matches which field....and, more importantly,  
> don't
> have to renumber things when i add or remove a field to the select.

My fav is to use fetchall_arrayref({});

The "{}" (empty hash) tells fetchall_arrayref to return a array ref of  
hash refs - all the advantages of the above, but returns it as an  
arrayref.

Scott


From cas at taz.net.au  Thu Jul 16 23:51:01 2009
From: cas at taz.net.au (Craig Sanders)
Date: Fri, 17 Jul 2009 16:51:01 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <1247729931.15383.1325312937@webmail.messagingengine.com>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
Message-ID: <20090717065101.GB15107@taz.net.au>

On Thu, Jul 16, 2009 at 03:38:51PM +0800, Sam Watkins wrote:
> I highly recommend using the "bind values" stuff with the ?s in the SQL
> and corresponding parameters to execute.  DBI will quote and escape
> values for you correctly so you don't need to worry about SQL injection
> attacks, etc.

i would go way beyond 'highly recommending' them and simply refuse to
mention that there's any other way to pass variables to prepare & execute.

if someone wants to shoot themselves in the foot, they can do it without
my help.

craig

-- 
craig sanders <cas at taz.net.au>

From wigs at stirfried.org  Thu Jul 16 23:50:35 2009
From: wigs at stirfried.org (wigs at stirfried.org)
Date: Fri, 17 Jul 2009 16:50:35 +1000
Subject: [Melbourne-pm] fetchrow_array() vs fetchrow_arrayref() WAS
	RE:	Perl DBI reference recommendations
In-Reply-To: <20090717064517.GA15107@taz.net.au>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
	<96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
	<20090717064517.GA15107@taz.net.au>
Message-ID: <20090717065035.GA20804@stirfried.org>

On Fri, Jul 17, 2009 at 04:45:18PM +1000, Craig Sanders wrote:
> i tend to use fetchrow_hashref() or fetchall_hashref() - that way i can
> use the sql column names to access the data and don't have to guess
> which array element matches which field....and, more importantly, don't
> have to renumber things when i add or remove a field to the select.

This approach is also more resilient on those occasions that you have
done a 'SELECT *', and someone then goes and changes the underlaying
table schema by reordering or adding new rows.  If you fetch the rows
by array your code suddenly breaks at that point, often silently.

-- 
Aaron

From cas at taz.net.au  Fri Jul 17 00:11:08 2009
From: cas at taz.net.au (Craig Sanders)
Date: Fri, 17 Jul 2009 17:11:08 +1000
Subject: [Melbourne-pm] fetchrow_array() vs fetchrow_arrayref() WAS RE:
 Perl DBI reference recommendations
In-Reply-To: <D086BC64-1DD5-421A-AFFF-85ED5ABBD5A8@dd.com.au>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
	<96CF49BD8B56384395D698BA99007FA347A4B8@exchange.pacwire.local>
	<20090717064517.GA15107@taz.net.au>
	<D086BC64-1DD5-421A-AFFF-85ED5ABBD5A8@dd.com.au>
Message-ID: <20090717071108.GC15107@taz.net.au>

On Fri, Jul 17, 2009 at 04:49:37PM +1000, Scott Penrose wrote:
> On 17/07/2009, at 4:45 PM, Craig Sanders wrote:
> >i tend to use fetchrow_hashref() or fetchall_hashref() - that way
> >i can use the sql column names to access the data and don't have
> >to guess which array element matches which field....and, more
> >importantly, don't have to renumber things when i add or remove a
> >field to the select.
>
> My fav is to use fetchall_arrayref({});
>
> The "{}" (empty hash) tells fetchall_arrayref to return a array ref
> of hash refs - all the advantages of the above, but returns it as an
> arrayref.

ah, that's neat.  didn't know that one.  thanks.

presumably it retains the order of records returned in the query, so
"order by" is actually useful (unlike with the _hashref methods which
are, obviously, un-ordered).

craig

-- 
craig sanders <cas at taz.net.au>

All the waters of the earth are in the armpit of the Great Frog.
		-- R. Crumb

From megamic at gmail.com  Mon Jul 20 17:34:48 2009
From: megamic at gmail.com (megamic at gmail.com)
Date: Tue, 21 Jul 2009 00:34:48 +0000
Subject: [Melbourne-pm] perl programmer wanted
Message-ID: <00163646d5f00d9756046f2c6ce8@google.com>

G'day folks

Government agency in Canberra looking for a Perl programmer with a  
scientific background. Desired traits:
- Good Perl programming skills. Don't need to be an expert. Knowledge of  
modern Perl well regarded.
- Experience working in a team environment using an Agile methodology.
- Appreciation of and commitment to good software engineering.
- Self-discipline, resourceful, organized

The following scientific skills and knowledge would also be highly regarded:
- time series and frequency domain analysis
- performing mathematical inversions
- signal processing

The successful candidate will be expected to converse closely with  
scientists during the implementation of scientific software specifications.

Contractor rates available.

Please email megamic at gmail.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090721/c23e6615/attachment.html>

From matt at secondaryfusion.net  Sun Jul 26 23:56:33 2009
From: matt at secondaryfusion.net (matt)
Date: Mon, 27 Jul 2009 16:56:33 +1000
Subject: [Melbourne-pm] Perl DBI reference recommendations
In-Reply-To: <1247729931.15383.1325312937@webmail.messagingengine.com>
References: <3c2b63c00907152310l215707aqef483d79ab5f773b@mail.gmail.com>
	<878wipw2z9.fsf@rimspace.net>
	<3c2b63c00907152357j74cbe145i666c1fa0c3a23025@mail.gmail.com>
	<1247729931.15383.1325312937@webmail.messagingengine.com>
Message-ID: <b289452a0907262356l39b6452fs3fa3555d0418a52d@mail.gmail.com>

On Thu, Jul 16, 2009 at 5:38 PM, Sam Watkins<sam at nipl.net> wrote:
>> I want a handy 'desk' reference with
>>
>> a) Lots of examples
>> b) Easy to read and complete reference material
>>
>> The reason is that I can't hold the details in my head (because I do
>> not DBI regularly) , but I need to keep knocking off dirty that little
>> scripts that run sql queries. I figure the easiest way for that is SQL
>> via DBI rather than an abstraction module.
>
> Here is a little "handy desk reference" for you, covering all of DBI
> that you should use. ?It is shorter than the manpage or a book ;)
>
> my $dbh =
> DBI->connect("DBI:mysql:database=$database;host=$hostname;port=$port",
> $username, $password);
> my $sth = $dbh->prepare("SELECT foo, bar FROM baz WHERE foo = ? AND bar
> = ?");
> $sth->execute("foovalue", $barvalue);
> while (my $row = $sth->fetchrow_arrayref) {
> ?my ($foo, $bar) = @$row;
> ?print "$foo ?$bar\n";
> }
> $sth->finish;
>
>
> You should rarely need to use anything other than the above from DBI.
> keep it simple!
>
> I highly recommend using the "bind values" stuff with the ?s in the SQL
> and corresponding parameters to execute. ?DBI will quote and escape
> values for you correctly so you don't need to worry about SQL injection
> attacks, etc.
>
> DBI has umpteen different fetch methods, your life will be easier if you
> just use one of them.
>
> regards,
>
> Sam
> _______________________________________________
> Melbourne-pm mailing list
> Melbourne-pm at pm.org
> http://mail.pm.org/mailman/listinfo/melbourne-pm
>

It's not clearly documented but the empty-hashref-arg trick is also quite neat:

my $select = $dbh->prepare("SELECT 1 as one, 2 as two, 3 as three");
$select->execute;
foreach my $row ( $select->fetchall_arrayref({}) ) {
 print Dumper($row); # { one => 1, two => 2, three => 3 }
}

From alec.clews at gmail.com  Tue Jul 28 19:18:27 2009
From: alec.clews at gmail.com (Alec Clews)
Date: Wed, 29 Jul 2009 12:18:27 +1000
Subject: [Melbourne-pm] Sept Fail 100 Bug Squash
Message-ID: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>

G'Day,

Jarich proposed, and was enthusiastically supported, that we have a
Perl Fail 100 bug squash session -- probably in Sept.

For those not present the idea is that we get together at a meeting
and see how many of the top 100 Perl bugs we can fix. The list is at
http://ali.as/top100/)

Since that is less than 8 weeks away perhaps we should start planning?

I have a few questions:

1) Are we holding a planning session or a hackathon? or both?
2) Can we get a venue with internet access? there was some discussion
that our current venue might be a networking problem... (I do have a
WiFi router/hub we can use)
3) Shall we pair program and can we get the least experienced paired with most?
4) If we have a network then shall we deliver via GitHub or Gitorious.
What would the workflow be? or use Git via ssh on a LAN? or an SVN
server...
5) Can we support remote contributors e.g. using irc?
6) Does anyone not have a laptop to bring and do we have any
alternative to offer?

Cheers

PS -- Hope this does not seem too officious...

--
Alec Clews
Personal <alec.clews at gmail.com> ? ? ? ? ? ? Melbourne, Australia.
Jabber: ?alecclews at jabber.org.au ? ? ? ? ? ? PGPKey ID: 0x9BBBFC7C
blog:http://alecthegeek.wordpress.com/

From daniel at rimspace.net  Thu Jul 30 00:00:37 2009
From: daniel at rimspace.net (Daniel Pittman)
Date: Thu, 30 Jul 2009 17:00:37 +1000
Subject: [Melbourne-pm] our $AUTHORITY = 'cpan:STEVAN';
Message-ID: <87ljm6r6y2.fsf@rimspace.net>

G'day.

Despite my best efforts I can't track down what the heck the $AUTHORITY
variable is used for.  Context obviously suggests CPAN, but none of my hunting
in the documentation tells me what it is about.

So, can someone take pity on me and point me at the appropriate manual?

Regards,
        Daniel
-- 
? Daniel Pittman            ? daniel at rimspace.net            ? +61 401 155 707
               ? made with 100 percent post-consumer electrons

From lsharpe at pacificwireless.com.au  Thu Jul 30 00:07:45 2009
From: lsharpe at pacificwireless.com.au (Leigh Sharpe)
Date: Thu, 30 Jul 2009 17:07:45 +1000
Subject: [Melbourne-pm] our $AUTHORITY = 'cpan:STEVAN';
References: <87ljm6r6y2.fsf@rimspace.net>
Message-ID: <96CF49BD8B56384395D698BA99007FA347A4E7@exchange.pacwire.local>

G'day Daniel, 
This page:
http://somethingdoug.com/thoughts/2008/12/31/our-authority/

Contains a link to this manual page:
http://perlcabal.org/syn/S11.html#Versioning

which looks like it *might* answer your question.
 

Leigh.


-----Original Message-----
From: melbourne-pm-bounces+lsharpe=pacificwireless.com.au at pm.org [mailto:melbourne-pm-bounces+lsharpe=pacificwireless.com.au at pm.org] On Behalf Of Daniel Pittman
Sent: Thursday, 30 July 2009 5:01 PM
To: melbourne-pm at pm.org
Subject: [Melbourne-pm] our $AUTHORITY = 'cpan:STEVAN';

G'day.

Despite my best efforts I can't track down what the heck the $AUTHORITY variable is used for.  Context obviously suggests CPAN, but none of my hunting in the documentation tells me what it is about.

So, can someone take pity on me and point me at the appropriate manual?

Regards,
        Daniel
-- 
? Daniel Pittman            ? daniel at rimspace.net            ? +61 401 155 707
               ? made with 100 percent post-consumer electrons _______________________________________________
Melbourne-pm mailing list
Melbourne-pm at pm.org
http://mail.pm.org/mailman/listinfo/melbourne-pm

From rick at measham.id.au  Thu Jul 30 00:26:00 2009
From: rick at measham.id.au (Rick Measham)
Date: Thu, 30 Jul 2009 17:26:00 +1000
Subject: [Melbourne-pm] our $AUTHORITY = 'cpan:STEVAN';
In-Reply-To: <96CF49BD8B56384395D698BA99007FA347A4E7@exchange.pacwire.local>
References: <87ljm6r6y2.fsf@rimspace.net>
	<96CF49BD8B56384395D698BA99007FA347A4E7@exchange.pacwire.local>
Message-ID: <4A714B08.20103@measham.id.au>

Leigh Sharpe wrote:
> G'day Daniel, 
> This page:
> http://somethingdoug.com/thoughts/2008/12/31/our-authority/

Ahh, that's cool!

I was saying a few months back (after Alec's Git talk) that it would be 
nice to replace CPAN with /git(hub)?/. Then I can fork someone's 
Foo::Bar and use it, and allow it to be used, without the confusion that 
it would cause if I put a second Foo::Bar on CPAN.

possibly something like:
    use Foo::Bar:auth<github:RICKM> 9813
(where 9813 is the revision number used as a $VERSION)

I've not been a part of any of this discussion and had no idea about 
this auth stuff or any of it so may be totally off base. Forgive me :-D

Cheers!
Rick Measham
-------------- next part --------------
A non-text attachment was scrubbed...
Name: smime.p7s
Type: application/x-pkcs7-signature
Size: 3241 bytes
Desc: S/MIME Cryptographic Signature
URL: <http://mail.pm.org/pipermail/melbourne-pm/attachments/20090730/c3ac9170/attachment.bin>

From alecclews at gmail.com  Thu Jul 30 00:38:08 2009
From: alecclews at gmail.com (Alec Clews)
Date: Thu, 30 Jul 2009 17:38:08 +1000
Subject: [Melbourne-pm] our $AUTHORITY = 'cpan:STEVAN';
In-Reply-To: <4A714B08.20103@measham.id.au>
References: <87ljm6r6y2.fsf@rimspace.net>	<96CF49BD8B56384395D698BA99007FA347A4E7@exchange.pacwire.local>
	<4A714B08.20103@measham.id.au>
Message-ID: <4A714DE0.9020603@gmail.com>

Rick Measham wrote:
>
> I was saying a few months back (after Alec's Git talk) that it would 
> be nice to replace CPAN with /git(hub)?/. Then I can fork someone's 
> Foo::Bar and use it, and allow it to be used, without the confusion 
> that it would cause if I put a second Foo::Bar on CPAN.

mmm... Bit of a double edged sword that.

It's very confusing trying to work out which is the correct version 
(which version has the feature I need and has been tested and is not 
broken with something else I'm not interested in). I'm currently 
experiencing this affect trying to track various versions of a Git 
support for Vim package.

On the balance I would prefer to keep CPAN, possibly with a fall-back to 
a GitHub style approach for bleeding edge.

-- 
Alec Clews
Personal <alec.clews at gmail.com>			Melbourne, Australia.
Jabber:  alecclews at jabber.org.au		PGPKey ID: 0x9BBBFC7C
Blog  http://alecthegeek.wordpress.com/


From ddick at aapt.net.au  Thu Jul 30 01:25:07 2009
From: ddick at aapt.net.au (David Dick)
Date: Thu, 30 Jul 2009 18:25:07 +1000
Subject: [Melbourne-pm] Sept Fail 100 Bug Squash
In-Reply-To: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>
References: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>
Message-ID: <4A7158E3.30006@aapt.net.au>

On 29/07/09 12:18, Alec Clews wrote:
> 2) Can we get a venue with internet access? there was some discussion
> that our current venue might be a networking problem... (I do have a
> WiFi router/hub we can use)
>    
Hopefully this issue can be resolved.  s/Was too busy/Forgot entirely/ 
to ask our sys-admin team about setting up a perl mongers dmz today, but 
confident that we should be able to be ready by the september meeting.  
That should enable us to plug a hub type thingy into the wall and get 
direct internet access. Will attempt to remember to confirm this tomorrow.
> PS -- Hope this does not seem too officious...
>    
Nope, and definitely more organised than i am... :)

From toby.corkindale at strategicdata.com.au  Thu Jul 30 03:27:36 2009
From: toby.corkindale at strategicdata.com.au (Toby Corkindale)
Date: Thu, 30 Jul 2009 20:27:36 +1000
Subject: [Melbourne-pm] Sept Fail 100 Bug Squash
In-Reply-To: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>
References: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>
Message-ID: <4A717598.60201@strategicdata.com.au>

Alec Clews wrote:
> G'Day,
> 
> Jarich proposed, and was enthusiastically supported, that we have a
> Perl Fail 100 bug squash session -- probably in Sept.
> 
> For those not present the idea is that we get together at a meeting
> and see how many of the top 100 Perl bugs we can fix. The list is at
> http://ali.as/top100/)

I'm getting a 404 on that URL at the moment :(

> Since that is less than 8 weeks away perhaps we should start planning?

Sounds like a good plan!

> 1) Are we holding a planning session or a hackathon? or both?

I vote to skip the planning session and go straight for the hackathon.

> 2) Can we get a venue with internet access? there was some discussion
> that our current venue might be a networking problem... (I do have a
> WiFi router/hub we can use)

I think internet access would be pretty much required for us to be 
effective, at least as far as checking CPAN Testers, mailing lists, and 
IRC goes.

> 3) Shall we pair program and can we get the least experienced paired with most?
> 4) If we have a network then shall we deliver via GitHub or Gitorious.
> What would the workflow be? or use Git via ssh on a LAN? or an SVN
> server...

GitHub makes sense to me; I haven't tried Gitorious yet but don't have 
anything against it.

We could do without any of the above if there was just a wiki page with 
a list of projects people were working on and their Git repos, whereever 
they preferred?

I mean, I don't see us getting so many people involved that we need a 
massive amount of co-ordination.

== Win32::GUI ==
  * Toby - git://dryft.net/Win32-GUI
  * Alec - git://clewbat.org/~alec/Win32-Gui
== LPW::UserAgent ==
  * Nick - http://github.com/Damo/LWP-UserAgent


> 5) Can we support remote contributors e.g. using irc?

Sounds like a nice plan, but it would be good to get people together, 
wouldn't it? Otherwise wouldn't be that different to a global 
perlmongers push rather than local? (That said, nothing wrong with 
encouraging that either)

> 6) Does anyone not have a laptop to bring and do we have any
> alternative to offer?


-Toby

From alecclews at gmail.com  Thu Jul 30 16:26:45 2009
From: alecclews at gmail.com (Alec Clews)
Date: Fri, 31 Jul 2009 09:26:45 +1000
Subject: [Melbourne-pm] Sept Fail 100 Bug Squash
In-Reply-To: <4A717598.60201@strategicdata.com.au>
References: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>
	<4A717598.60201@strategicdata.com.au>
Message-ID: <4A722C35.1000909@gmail.com>

Project Wiki Page  http://perl.net.au/wiki/Melbourne_Fail_100_Project

-- 
Alec Clews
Personal <alec.clews at gmail.com>			Melbourne, Australia.
Jabber:  alecclews at jabber.org.au		PGPKey ID: 0x9BBBFC7C
Blog  http://alecthegeek.wordpress.com/


From wayland at wayland.id.au  Thu Jul 30 17:05:21 2009
From: wayland at wayland.id.au (Timothy S. Nelson)
Date: Fri, 31 Jul 2009 10:05:21 +1000 (EST)
Subject: [Melbourne-pm] our $AUTHORITY = 'cpan:STEVAN';
In-Reply-To: <4A714B08.20103@measham.id.au>
References: <87ljm6r6y2.fsf@rimspace.net>
	<96CF49BD8B56384395D698BA99007FA347A4E7@exchange.pacwire.local>
	<4A714B08.20103@measham.id.au>
Message-ID: <alpine.LRH.1.10.0907311001400.3366@gwalcmai.nelson.org.au>

On Thu, 30 Jul 2009, Rick Measham wrote:

> Leigh Sharpe wrote:
>> G'day Daniel, This page:
>> http://somethingdoug.com/thoughts/2008/12/31/our-authority/
>
> Ahh, that's cool!
>
> I was saying a few months back (after Alec's Git talk) that it would be nice 
> to replace CPAN with /git(hub)?/. Then I can fork someone's Foo::Bar and use 
> it, and allow it to be used, without the confusion that it would cause if I 
> put a second Foo::Bar on CPAN.
>
> possibly something like:
>   use Foo::Bar:auth<github:RICKM> 9813
> (where 9813 is the revision number used as a $VERSION)
>
> I've not been a part of any of this discussion and had no idea about this 
> auth stuff or any of it so may be totally off base. Forgive me :-D

 	The p6l (perl6-language) list is the appropriate forum for that sort 
of idea.  There's been a lot of discussion of CPAN-related stuff, but not much 
in the way of conclusions.

 	Part of the problem has been that the term "CPAN" refers to at least 3 
different things.  See http://perlcabal.org/syn/S22.html#Terminology_and_Scope 
for information.

 	HTH,

 	:)


---------------------------------------------------------------------
| Name: Tim Nelson                 | Because the Creator is,        |
| E-mail: wayland at wayland.id.au    | I am                           |
---------------------------------------------------------------------

----BEGIN GEEK CODE BLOCK----
Version 3.12
GCS d+++ s+: a- C++$ U+++$ P+++$ L+++ E- W+ N+ w--- V- 
PE(+) Y+>++ PGP->+++ R(+) !tv b++ DI++++ D G+ e++>++++ h! y-
-----END GEEK CODE BLOCK-----


From ddick at aapt.net.au  Fri Jul 31 01:30:53 2009
From: ddick at aapt.net.au (David Dick)
Date: Fri, 31 Jul 2009 18:30:53 +1000
Subject: [Melbourne-pm] Sept Fail 100 Bug Squash
In-Reply-To: <4A7158E3.30006@aapt.net.au>
References: <3c2b63c00907281918k39027553xd976d3f59a91ac0e@mail.gmail.com>
	<4A7158E3.30006@aapt.net.au>
Message-ID: <4A72ABBD.6060107@aapt.net.au>


On 30/07/09 18:25, David Dick wrote:
>
> On 29/07/09 12:18, Alec Clews wrote:
>> 2) Can we get a venue with internet access? there was some discussion
>> that our current venue might be a networking problem... (I do have a
>> WiFi router/hub we can use)
> Hopefully this issue can be resolved.  s/Was too busy/Forgot entirely/ 
> to ask our sys-admin team about setting up a perl mongers dmz today, 
> but confident that we should be able to be ready by the september 
> meeting.  That should enable us to plug a hub type thingy into the 
> wall and get direct internet access. Will attempt to remember to 
> confirm this tomorrow.
Confirmed. We will have internet access by next meeting (Aug 12th).