[Rio-pm] [DUVIDA] Chamar função sem declarar construtor

[Aureliano Guedes]

Errei nesse exemplo, seria my $p = algumacoisa();
Mas ok, o Junior falou do 'Exporter', então o que eu to tentando fazer é:package Palindrome;use strict;use Exporter 'import';@EXPORT_OK =  qw(is_palindrome);sub is_palindrome {return 1 if ($_[0] == reverse $_[0]);}1;
mas quando tento
use Palindrome 'all';print "ok" if (is_palindrome($ARGV[0]));
e executo na shell 'perl exemplo.pl 111' ou qualquer outro número palíndromo ou não, não imprime "ok", apesar de não gerar nenhuma mensagem de erro.
From: tiago.peczenyj em gmail.com
Date: Tue, 29 Apr 2014 17:43:22 -0300
To: rio-pm em pm.org
Subject: Re: [Rio-pm]	[DUVIDA] Chamar função sem declarar construtor

isto é uma subrotina exportada
onde vc viu
my $p;
$p->algumacoisa;
?



2014-04-29 17:40 GMT-03:00 Aureliano Guedes <guedes_1000 em hotmail.com>:





#!/usr/bin/perl
use strict;use warnings;use Math::Prime::Util ':all';
print "ok" if (is_prime($ARGV[0]));


From: tiago.peczenyj em gmail.com
Date: Tue, 29 Apr 2014 17:36:23 -0300
To: rio-pm em pm.org


Subject: Re: [Rio-pm]	[DUVIDA] Chamar função sem declarar construtor

de exemplos.



2014-04-29 17:34 GMT-03:00 Aureliano Guedes <guedes_1000 em hotmail.com>:







Ola monges,
Tenho uma pequena dúvida.Quando vamos usar uma função(sub-rotina) de um módulo fazemos na maioria das vezes o seguinte:
use Modulo::Modulo;




my $p = Modulo::Modulo->new();$p->funcao();....
isso porque no modulo tem um contrutor ou foi gerado de presente ao autor quando usado o Moose ou semelhante.




A questão é que alguns poucos módulos permitem que seja feito diretamente
use Modulo::Modulo;
my $p;$p->funcao();....




A dúvida é: como o autor do módulo faz para que permita fazer a chamada das funções sem precisar disso:my $p = Modulo::Modulo->new(); 		 	   		  





_______________________________________________

Rio-pm mailing list

Rio-pm em pm.org

http://mail.pm.org/mailman/listinfo/rio-pm


-- 
Tiago B. Peczenyj
Linux User #405772





http://about.me/peczenyj


_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm 		 	   		  

_______________________________________________

Rio-pm mailing list

Rio-pm em pm.org

http://mail.pm.org/mailman/listinfo/rio-pm


-- 
Tiago B. Peczenyj
Linux User #405772



http://about.me/peczenyj


_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm 		 	   		  
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20140429/5767594f/attachment-0001.html>