Bonjour, j'aimerais savoir connaître l'équivalent de (1..$nb) dans les autres langages que Perl.

Je voudrais savoir si c'est une erreur que Perl m'autorise à faire ou si il faut une autre syntaxe.

Merci

Perl:
Code perl : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
use warnings;
use strict;
 
print "Quel est le titre de la série ?\n";
my $serie = ucfirst(<>); chomp $serie;
 
print "Combien de saisons ?\n";
my $saisons = int(<>);
 
mkdir $serie; chdir $serie;
 
foreach my $_ (1..$saisons) { mkdir "saison $_"; }

Ruby:
Code ruby : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
puts "Quel est le titre de la série ?"
serie = gets.chomp.to_s
 
puts "Combien de saisons ?"
saisons = gets.chomp.to_i
 
Dir::mkdir "#{serie}"; Dir::chdir "#{serie}"
for i in (1.."#{saisons}") do
    Dir::mkdir "saison #{saisons}"
end

Python:
Code python : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
#-*-coding:utf-8-*-
import os
 
print "Quel est le titre de la série ?"
serie = raw_input()
 
print "Combien de saisons ?"
saisons = input()
 
os.mkdir(serie); os.chdir(serie)
for i in (1,saisons):
    os.mkdir("saison "+"%s" %saisons)