Array::Utils: Wie Rückgabewert als Liste interpretieren (gelöst) - #189219 (Allgemeines zu Perl)

haj

2018-11-18 13:13

User since
2015-01-07
527 Artikel
BenutzerIn

user image

Das ist jetzt ein bisschen spitzfindig, aber das ist einer der Fälle, in denen Du keine Liste brauchst, sondern ein Array. Subroutinen geben aber Listen zurück.

Code (perl): (dl )

use Array::Utils qw(:all);
my @new = (1,2,3,4);
my @old = (4,5,6,7,8);
push @new, splice(@{[array_minus( @old, @new)]}, 0, 3); # Einzeiler
print join ",",  @new;

Mit dem Umweg @{[liste]} wird hier die Liste in ein Array konvertiert.