Når du prøver å kjøre følgende skript, dens kaste denne feilmeldingen:
"Bruk av uinitialisert verdi i medlemskap eller streng på arraydef.pl linje 17."


Manuset er [jeg limer med linjenumre]:


1 #! / Usr / bin /perl
2
3 bruk streng;
4
5 min @ a \u003d (1 ... 10);
6
7 print "Original utvalg: @ a \ n";
8
9 # SLETT Function
10
11 min $ size \u003d @ a;
12
13 print "størrelse arry før du sletter 1ste element: $ size \ n";
14
15
16 slette ($ a [0]); # Slette 1ste element
17 print "Array etter sletting første elementet: @ a \ n";
18 $ size \u003d @ a;
19 print "størrelse arry etter slette 1ste element: $ size \ n"; # størrelse dont avvike wen vi sletter 1. eller midten,,. Det skiller bare wen vi sletter siste elementet.
20
21 slette ($ a [$ size-1]);
22 print "Array etter fjerner siste element: @ a \ n";
23 $ size \u003d @ a;
24 print "størrelse arry etter fjerner siste element: $ size \ n";

slette (noe) gjør "noe" udefinert

praveen, prøv skifte funksjonen på matrisen

men hvordan bli kvitt denne feilen?

Yogesh gav deg svaret. forskyve array. Hvis du ikke liker det så fortell oss hva behovene dine er. Med andre ord hva er du prøver å gjøre med perl kode ...

Ifølge POD, for en rekke element, slette () angir element til undef. Så $ a [0] vil bli undef. print @ a vil deretter gi en advarsel (ikke feil) hvis advarsler er aktivert.