Grants Cancellation

As announced in the official blog (link), three grants have been cancelled. All of them have been stalled for some time.

It is neither a pleasant nor easy decision for us to cancel grants regardless of a reason. I understand the grant managers and the grantees did their best to make progress but delivering a grant is not always easy.

One of the major reasons to terminate grants is our budget. In the next post, I will discuss our budget and explain why it is necessary to cancel stalled grants.

XS, Advanced XS Callback Patch For OCI, Part IX A little review

Well just another quick installment for my new chapter in XS Fun This time I am just going to review what we have gone over so far before we dive into the real fun stuff.

Now we are more than half way there at least in code changes and we have covered allot of varies subjects from general 'c' programming the very specific OCI programming and a little XS sprinkled about.

So I have shown you how to get your callback into and out of DBD::Oracle with the dbd_db_STORE_attrib and dbd_db_FETCH_attrib functions. Here we saw the use of a few XS macros to make our life a little eiaser , such as 'strEQ' a little memory management with SvREFCNT_dec and a few other.

We also saw how I used a 'c' struct (structure) to hold the pointers to my paremates and how I declared this in a '.h' or header so I could use them in other 'c' programs rather than just including them in the dbdimp.c file.

The Joy In What We Do by Sawyer X This is perhaps the best...

The Joy In What We Do by Sawyer X

This is perhaps the best speech I’ve ever heard about software development. Thank you Sawyer X.

[From my blog.]

$4,000 grant approved

The Grants Committee approved and funded the grant proposal "Modern Object Oriented Programming in Perl" in the previous round.

This is our first time to fund a grant which exceeds $3,000 since we lifted the grant limit of $3,000 earlier this year.

I am pleased that we are now able to fund larger scale grants and help the Perl development. While we don't have unlimited budget, it is the right thing that appropriate amount of money is funded for good projects which will help the growth of Perl.

If you did not submit a grant proposal in the past just because $3,000 limit was too low, act now. The deadline of the next evaluation round is July 15th.

For choosing the grant amount, see "Improving the grant program (1) Grant Limit" too.

XS, Advanced XS Callback Patch For OCI, Part VIII Just a little 'c'

Just a quick one tonight's installment for my new chapter in XS Fun just looking at the next function from my patch.

Now just to continue on to the next logical step we will need a disable function as well so my patch is


++static void disable_ha( imp_dbh_t *imp_dbh) {

++  sword status;
++    ha_callback_t haevents;
++    haevents.function = NULL;
++    haevents.dbh_ref = NULL;
++    OCIAttrSet_log_stat(imp_dbh->envhp, (ub4) OCI_HTYPE_ENV,NULL ,(ub4)0,(ub4)OCI_ATTR_EVTCBK, imp_dbh->errhp, status);
++	OCIAttrSet_log_stat(imp_dbh->envhp, OCI_HTYPE_ENV,haevents,0,OCI_ATTR_EVTCTX, imp_dbh->errhp , status);

++    return;

static void disable_taf(
    imp_dbh_t *imp_dbh) {

so here we have a 'void' function, one that does not return anything, that simply cleans up some memory on the Oracle side of things as we are cleaning up our FAN callback basically by sending NULL over to Oracle for the values that we actully have not set up yet.

Procedural Quest Generation in Perl

Yes, it's another post about Veure (whose actual name we might finally have chosen, but that's another story), the MMORPG that I've been writing.

There are 117 stars in a 20 light year radius around Sol. There are 544 space stations and currently there are 3,080 rooms in those stations (and that number is growing). That means there's a lot of area, but how do I fill that area? There's a lot of work still left to be done, but I took a quick stab at implementing a procedural mission generator as described in this paper. Surprisingly, the core of the code only took about an hour to write.

Charlie Stross on the future of technology and Perl.

Charlie Stross on the future of technology and Perl.

[From my blog.]

XS, Advanced XS Callback Patch For OCI, Part VII Back into 'C' and a little XS

Tonight's installment for my new chapter in XS Fun I am heading back to the 'c' land again looking at the function that actuality sets up the callback.

So now that we have a place to store of callback we can have another quick look at the 'dbd_db_STORE_attrib' function and this little addtion

    if (SvTRUE(valuesv)) {
        enable_ha(dbh, imp_dbh);
   else {

About is a common blogging platform for the Perl community. Written in Perl and offering the modern features you’ve come to expect in blog platforms, the site is run by Dave Cross and Aaron Crane, with a design donated by Six Apart, Ltd.