2 Arrays vergleichen und Inhalte ersetzen wenn unterschiedlich - #191858 (Allgemeines zu Perl)

Linuxer

2020-05-27 12:19

User since
2006-01-27
3870 Artikel
HausmeisterIn

user image

Hallo Gast,

Der zu betrachtende Index ist immer identisch? Es geht immer um die gleiche Position in array1 und array2?
D.h. wenn array2 10 Einträge enthält, werden die ersten 10 Einträge des array1 ersetzt?
Wenn array2 nur 1 enthält, wird nur der erste Eintrag im array1 ersetzt?

Gedanke:
Was soll passieren, sollte array2 doch einmal mehr Einträge als array1 haben?

# Schnellschuss:

Code (perl): (dl )

#! /usr/bin/env perl
use strict;
use warnings;
use 5.010;

my @array1 = (
    1,
    1,
    1,
    1,
);

my @array2 = (
    2,
    2,
    undef,
    0,
);

for( my $i=0;$i<@array2; $i++ ) {

    next if !defined $array2[$i] || 0 == length($array2[$i]);

    $array1[$i] = $array2[$i]   if $array1[$i] < $array2[$i];
}

say $_ for @array1;

__END__

edit: fixed & changed code (array definitions)
Last edited: 2020-05-27 13:01:45 +0200 (CEST)

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!