Perl

[Perl] Traitement sur un array à partir de la référence de celui-ci

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Perl] Traitement sur un array à partir de la référence de celui-ci

burgergold

5$? va chez l'diable!

Je tente d'accéder à un array dont j'ai placé la référence dans un hash. Je suis capable de récupérer un élément bien précis, mais incapable d'effectuer un traitement sur l'array lui même (un grep en l'occurence.

Merci

Code :

sub httpd::conf {
my $self = { file => undef,
lines => undef,
@_
};
my @lines;
open (FENT, $self->{"file"});
while (<FENT> ) {
$_ =~ s/\n//g;
if ((grep ! /^#/, $_) && (grep ! /^$/, $_)) {
push (@lines, $_);
}
}
close FENT;
$self->{"lines"} = \@lines;
bless($self, "httpd::conf" );
}
sub httpd::conf::as_SSLEngine {
my $self = shift;
my @SSLEngine_line = grep /^SSLEngine /, $self->{"lines"};
if (@SSLEngine_line) {
return 1;
}
}

Publicité

burgergold

5$? va chez l'diable!

la solution semble être ceci:

@{$self->{"lines"}}

Aricoh

gentil mais fo po pousser

Burgergold a écrit :

la solution semble être ceci:

@{$self->{"lines"}}

A priori oui, tu es dans un contexte de liste

Dans ta 1ère fonction, tu fais ceci :

Code :

$self->{"lines"} = \@lines;

Ca doit pouvoir revenir à la même chose qu'en faisant ceci :

Code :

@{$self->{"lines"}} = @lines;

---------------
Samsung Galaxy S1 -> Samsung Galaxy S2 -> Samsung Note 2 -> Huawei Ascend Mate 7 -> ZTE Axon 7 -> OnePlus 6T -> Oppo Find X2 PRO -> Google Pixel 9 PRO XL

matafan

C'est pas vraiment un question de contexte : $self->{"lines"} est une référence à un array et le @{} permet de le « dereférencer », point.

FORUM HardWare.fr

Programmation

Perl

[Perl] Traitement sur un array à partir de la référence de celui-ci

Sujets relatifs
Concretement, comment faire pour generer du html a partir de xml	J aimerai a partir dun formulaire generer une image comme suit
Perl a des bon jours devant lui ?	afficher un bitmap à partir de la classe CClientDC
capture d'une frame a partir du flux video de ma webcam	[Perl] Net::Telnet vers une machine win32
Les tableaus à plusieurs dimension en Perl.	execution d'un script php sous perl
[Perl] Lancer une centaine de "threads" sous windows	afficher des images dix par dix sur perl
Plus de sujets relatifs à : [Perl] Traitement sur un array à partir de la référence de celui-ci

Page générée en 0.037 secondes