Déclarez plusieurs variables sur une ligne en perl

J'ai trouvé que je peux déclarer deux variables en une seule instruction à l'aide de:

my ($a,$b)=(1,2);

Mais je pense que cette syntaxe peut être source de confusion, par exemple, si nous avons eu cinq variables déclarations, il serait difficile de voir la valeur appartient à quelle variable. Donc, je pense que ce serait mieux si nous pouvions utiliser cette syntaxe:

my $a=1, $b=2;

Je me demande, pourquoi est ce genre de déclaration n'est pas possible dans Perl? Et existe-il des alternatives?

(J'essaie d'éviter de répéter my pour chaque déclaration comme: my $a=1; my $b=2;)

source d'informationauteur Håkon Hægland

  1. 13

    Pas. Les Variables déclarées par my sont nommés une fois l'instruction suivante commence. La seule façon que vous pouvez affecter à la variable nouvellement créée est si vous affectez à la variable qu'il renvoie. Pensez à my comme new qui déclare également.

    Comme pour votre code particulier,

    my $a=1, $b=2;

    signifie

    ((my $a)=1), ($b=2);

    Évidemment, pas bon.

    Si vous aviez utilisé des variables qui n'ont pas déjà été déclarée[1]vous avez obtenu un strict erreur.

    1. $a et $b sont predeclared dans chaque espace de noms pour faciliter l'utilisation de sort.
  2. 14

    Je suis nouveau sur Perl, mais je vais vous dire ce que j'ai appris jusqu'à présent.

    Je vais le changer à l'aide de $start et $end au lieu de $a et $bparce que $a et $b sont des variables spéciales qui sont toujours déclarés.

    Pour répondre à votre question initiale, vous pouvez déclarer et affecter plusieurs variables en une seule ligne comme ceci:

    my ($start, $end) = (1, 2);

    Personnellement, je trouve que sur le même typage et moins clair que d'avoir chacun sur une ligne distincte:

    my $start = 1;
my $end = 2;

    Cependant, je pense qu'il est utile d'assigner des paramètres de sous-programme pour les variables nommées, parce que les paramètres de sous-programme viennent dans une liste appelée @_:

    use strict;

sub print_range {
    my ($start, $end) = @_;
    print "Range is from $start to $end.\n";
}

print_range(10, 20); # => Range is from 10 to 20.

    Vous pouvez voir plus de bizarreries de la my déclaration dans la documentationy compris une façon d'ignorer certaines valeurs dans la liste.

  3. 6

    Ci-dessous est la méthode pour déclarer plusieurs variables sur une même ligne en perl:

    mon ($jour,$mon,$an,$rh,$min,$sec) = (0) x 6;

    Ici, toutes les variables ci-dessus a été initialisé à 0. La répétition de l'opérateur " x " est utilisé.

  4. -1

    Pour éviter toute confusion dans ces cas, on peut généralement faire comme ceci:

    my ($a, $b, $c, $d) = (
  1,  # => $a
  2,  # => $b
  3,  # => $c
  4   # => $d
);

    Selon la Principe de BAISER.

    ikegami notes de l'alternative serait de:

    my $a = 1;
my $b = 2;
my $c = 3;
my $d = 4;