Extensões para o Perl com C

Hoje fui ao PHP conference, e estava empolgado em ver uma palestra sobre como criar extensões para o PHP; e a vi.

A palestra foi ministrada pelo Marcelo Araujo, e me impressionei com a “facilidade” em se desenvolver uma extensão para este linguagem.

Quando cheguei em casa imaginei; como será que se desenvolve uma extensão em C para o Perl?

andre@debian-casa:/tmp/teste$ h2xs -A -n ExtensaoC

andre@debian-casa:/tmp/teste$ ls
ExtensaoC

andre@debian-casa:/tmp/teste$ cd ExtensaoC/
andre@debian-casa:/tmp/teste/ExtensaoC$ ls
Changes ExtensaoC.xs lib Makefile.PL MANIFEST ppport.h README t

andre@debian-casa:/tmp/teste/ExtensaoC$ vim ExtensaoC.xs

#include “EXTERN.h”
#include “perl.h”
#include “XSUB.h”

#include “ppport.h”

MODULE = ExtensaoC PACKAGE = ExtensaoC

void
mostra()
CODE:
printf(“Essa é minha extensão em C para o Perl\n”);

andre@debian-casa:/tmp/teste/ExtensaoC$ perl Makefile.PL

andre@debian-casa:/tmp/teste/ExtensaoC$ make

debian-casa:/tmp/teste/ExtensaoC# make install

andre@debian-casa:/tmp$ vim teste.pl

#!/usr/bin/perl -w

use strict;
use ExtensaoC;

ExtensaoC::mostra();

andre@debian-casa:/tmp$ perl teste.pl
Essa é minha extensão em C para o Perl

Mais simples ainda…..

Maiores informações: man h2xs

Ainda vou estudar mais isto, e postarei aqui!