Salut,


J’ai téléchargé-installé Active Perl 5.12.2 Build 1202.

Pourquoi obtiens-je un affichage avec le code suivant ? :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
#!C:\\Perl\\bin\\perl
use strict;
use warnings;
 
$a = 'Hello world.';		
$b = 'whadoyoudo ?' ;
print "$a\n$b\n";
select(undef, undef, undef, 10);
mais pas avec le code suivant ? :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
#!C:\\Perl\\bin\\perl
use strict;
use warnings;
 
$a = 'Hello world.';		
$b = 'whadoyoudo ?' ;
$c = "carac1=tatata carac2=tototo carac3=tititi carac4=tututu";
print "$a\n$b\n";
select(undef, undef, undef, 10);

Dans le premier cas, il apparait une fenêtre à fond noir et bandeau bleu en haut, qui persiste les 10 secondes qui sont spécifiées dans l’instruction select()

Dans le second cas, cette fenêtre apparait un dixième de seconde et disparait.
J’interprète ce comportement comme la conséquence d’une erreur dans le code parce que si je crée volontairement une erreur dans le premier code qui marche, par exemple en écrivant
$a = 'Hello world.";
j’obtiens la même fugacité de cette fenêtre noire.







Autre question.

J’ai écrit le fichier sous Notepad++ et l’ai enregistré dans C:\Perl sous le nom perl1.pl

Pour le tester, je fais ainsi:
- modification du script sous Notepad++
- je clique sur Fichier / Enregistrer
- j’appelle ensuite Démarrer/ Exécuter avec l’instruction C:\\Perl\\\perl1.pl
- il faut encore appuyer sur OK


Est-ce qu’il y a moyen d’éviter ces allées et venues entre le fichier sous Notepad++ et le lancement par ligne de commande ? Car ce n’est pas pratique.



Merci