Um das zu beheben, können Sie die zwei „elsif gerade ändern ($next eq“ zeichnet um zu sein:
elsif ($next und $next eq…
Das überprüft, um sicherzustellen, dass $next definiert wird, bevor man versucht, ihn zu vergleichen.
Hinsichtlich der Initialisierung einer Variable in Perl, bedeutet das gerade die Zuordnung eines Wertes ihm. Die Warnung sagt gerade, dass $next unbestimmt ist (irgendein, weil es nicht zugewiesen worden ist, dennoch oder, weil es ausdrücklich undef'd war).