Este endereço mudou para: http://andrem.wordpress.com

Os projetos que estavam aqui para download, podem ser baixados em: http://github.com/andrem
Textos
Cups Parte Um 
Dica Rewrite Ubuntu 
Dicas C 
Dicas Shell Script 
HTML Template Perl 
Ketchup 
Mysql pt BR 
Oscommerce Shopline 
Perl com C 
Pesquisa Cpan Firefox 
Pesquisa Perldoc Firefox 
Processos no Kernel Linux 
Search Plugin 
Tradutor em Perl 
User Cups Ubuntu 
Whois em PHP 


Links
Perl & C

Escrever em Perl com sub rotinas C é muito simples, graças ao módulo Inline::C (http://search.cpan.org/~ingy/Inline-0.44/C/C.pod).

Instalando o Módulo:

Como root execute o comando:

#cpan

Agora dentro do Cpan é só mandar instalar:

#cpan> install Inline::C

Criando uma rotina em C no seu script em Perl

#!/usr/bin/perl

use strict;
use warnings;
use Inline C => <<END_OF_C;
int soma(int a, int b) {
return a+b;
}
END_OF_C

print "Digite um Valor: ";
my $a = <STDIN>;
print "Digite outro Valor: ";
my $b = <STDIN>;

print soma($a, $b) . "\n";


Outra forma seria adicionar a sub rotina do C em um arquivo, deixando seu código mais enxuto:

#!/usr/bin/perl

use strict;
use warnings;
use Inline C => "minha_rotina.c";

print "Digite um Valor: ";
my $a = <STDIN>;
print "Digite outro Valor: ";
my $b = <STDIN>;

print soma($a, $b) . "\n";

Você pode integrar o Perl a outras linguagens como C++, Java, Python, entre outras. Com esse módulo fica muito simples você integrar funçoes complexas em C com o Perl, ai depende de sua necessidade.


André Osti de Moura
andreoandre [a] gmail [.] com