Discussion :

[alex436331]

Salut à vous tous, voilà j'ai un petit soucis en fait concernant les exceptions en Perl.

Je me suis renseigné (notamment sur ce forum) et j'ai vu qu'il existait plusieurs méthodes pour catcher les interruptions. Il y a le eval() avec le warn... mais j'ai vu qu'il était possible aussi d'utiliser le même principe qu'en Java ou C++avec le try et le catch. J'ai fait des tests et cela fonctionne correctement.

Par contre j'aurais besoin de définir mes propres interruptions et ca je ne vois pas comment faire, j'ai bien trouver des exemples, mais rien ne marche... Est-ce que quelq'un a déjà réalisé cela ou bien connaît une solution???

Merci d'avance pour vos idées/réponses.

[Jedai]

Tout d'abord : On ne poste pas dans ce forum, on poste dans les sous-forums, comme c'est clairement indiqué en haut de ce forum... Ton prochain message ici sera supprimé sans avertissement (à part un MP), pour celui-ci je me contente de le déplacer dans le sous-forum Langage.

Je me suis renseigné (notamment sur ce forum) et j'ai vu qu'il existait plusieurs méthodes pour catcher les interruptions. Il y a le eval() avec le warn... mais j'ai vu qu'il était possible aussi d'utiliser le même principe qu'en Java ou C++avec le try et le catch. J'ai fait des tests et cela fonctionne correctement.

Pour qu'on t'aide il va falloir que tu sois plus précis, try/catch n'existe pas en Perl en réalité, ce qui signifie que tu emploies l'un des modules de gestion d'exception disponible sur le CPAN, il faut nous dire lequel sinon nous aurons du mal à t'aider.

--
Jedaï

[alex436331]

Désolé de ne pas avoir poster dans un sous forum mais en voyant ta réponse je viens te refaire toutes les pages amenant à poster dans un forum et je n'ai rien vu qui indique qu'il ne faut pas faire dans la forum prinicpal... Enfin bref ce n'est qu'un détail et je le saurais pour l'éventuelle prochiane fois...

Bon sinon en effet c'est via un module CPAN que je passe il s'agit du module Error et sur ce joli lien http://www.perl.com/pub/a/2002/11/14...on.html?page=2 il ya un exemple de comment créer de nouvelles classes d'exceptions, mais problème cela ne fonctionne pas pour moi!!!

[alex436331]

http://www.perl.com/pub/a/2002/11/14/exception.html?page=2[/URL]

désolé le lien n'est pas passé en entier...

[Jedai]

http://www.perl.com/pub/a/2002/11/14...on.html?page=2 il ya un exemple de comment créer de nouvelles classes d'exceptions, mais problème cela ne fonctionne pas pour moi!!!

Comment utilises-tu cet exemple ?

--
Jedaï

[alex436331]

J'ai créer une class selon ce principe. Dans mon programme principal à un moment je créer un nouvel objet de ce type. Ensuite à la fin de mon programme, je fais un catch nom_de_classe with{} et donc normalement je devrais aller dans cette partie du catch puisque j'ai crée un objet de ce type mais cela n'y vas jamais.

Je vais mettre le code ca sera plus clair je pense

Programme principal

use MyExceptions;

...

try{
#éxécution du programme
new MyExceptions("Erreur");
...
}
catch MyExceptions with{
print "Catch\tCatch\tCatch\tCatch\tCatch\tCatch\t";
exit;
};

et dans le module MyException.pm j'ai recopier l'exemple qu'il ya sur le lien...

[Jedai]

On utilise des balise [ CODE ] pour le code (bouton #), pas des balises de citation.

Je vois plusieurs problèmes dans ton explication (à moins qu'il ne me manque des éléments) : MyExceptions n'est jamais défini dans ton code (si tu as bien simplement recopié l'exemple de l'article dans MyExceptions.pm), les exceptions définies sont MathException, DivideByZeroException et OverFlowException. Par ailleurs tu utilises new MyExceptions() au lieu de throw MyExceptions()....

--
Jedaï