Thread Wörter im Array zählen (4 answers)
Opened by wiederlader at 2008-02-19 15:34

wiederlader
 2008-02-19 15:34
#106102 #106102
User since
2007-01-03
36 Artikel
BenutzerIn
[default_avatar]
Hallo Zusammen,

da ich längere Zeit mal wieder nichts mit Perl gemacht habe, stehe ich mal wieder vor einem Problem und bekomme es nicht gelöst. Ich möchte in einer Datei/List (die ich in ein Array lade) nach bestimmten Namen suchen und zusätzlich Ausgeben wie oft der Name in der Datei vorhanden ist. Das mit dem Filehandel und so weiter ist mir schon klar, nur ich komme einfach nicht drauf, wie ich die Anzahl eines Wortes (Namen) aus einem Array ermittlen kann.

Folgend mein Script welches ausgibt ob der gesuchte Name vorhanden ist oder nicht. Zusätzlich soll aber auch ausgegeben werden wie oft der Name in dem Array vorhanden ist.

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

#!perl -w
use strict;
use warnings;

my @vorname;
my $vorname;
$vorname[0]= "Markus";
$vorname[1]= "Fritz";
$vorname[2]= "Otto";

my @liste;
my $liste;
$liste[0]= "Fritz";
$liste[1]= "Otto";
$liste[2]= "Fritz";
$liste[3]= "Josef";

my $zaehler = 0;

foreach (@vorname) {
         if ("@liste" =~ "$_")  {
         print "Der Vorname <<< $_ >>> ist vorhanden\n";
         }
         else   {
         print "Der Vorname <<< $_ >>> ist nicht vorhanden\n";
         }
  }


Mein Script gibt ja aktuell folgendes aus:

Der Vorname <<< Markus >>> ist nicht vorhanden
Der Vorname <<< Fritz >>> ist vorhanden
Der Vorname <<< Otto >>> ist vorhanden

Und da wo der Vorname vorhanden ist, soll "ist X Mal vorhanden" stehen.
Wie kann ich in meiner foreach Schleife zusätzlich die Anzahl ermitteln sofern der Vorname vorhanden ist ?
DANKE
Gruß
Markus

View full thread Wörter im Array zählen