Bonjour,

J'ai un bout de script dont je voudrais qu'il affiche un message ou fasse autre chose que si on est entre 7heures et 16heures :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
use warnings;
 
(my $sec, my $min, my $hour,my $mday,my $mon,my $year,my $wday,my $yday,my $isdst) = localtime(time) ;
if (($hours > 7) && ($hours < 16))   {
print "il est $hours heures tout va bien\n";
}
Naturellement ce script ne fonctionne pas. D'appres mes recherche sur internet une interval en Perl se traduit par ceci : ..
Mais je ne sais pas comment l'introduire dans mon script, j'ai essayé ceci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
use warnings;
 
(my $sec, my $min, my $hour,my $mday,my $mon,my $year,my $wday,my $yday,my $isdst) = localtime(time) ;
if ($hours = /7.. 16/)   {
print "il est $hours heures tout va bien\n";
}
Sans succès....
Merci de votre aide