Veriablen vergleichen

[roman lenz]

hi hi unbekanntes wesen

ich versuchs mal

my $variable2='23:24:25:26:27:28';
my $variable1='23:26';
my $meld;
my $i=0;
my @split= split(/:/,$variable1);
foreach(@split){
  if($variable2=~/$_/){
    i++;
  }
}
$i<scalar @split ?
  $meld='war nichts'
:
  (
   $i > scalar @split ?
     $meld='hier stimmt was nicht :-)'
   :
     $meld ='$variable1 in $variable2 enthalten'
  )

ist getestet und sollte laufen

bis bis roman