Opened by Gast at 2006-06-24 16:32
User since
2006-06-25
17 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-06-25
17 Artikel
BenutzerIn
Code: (dl
)
1
2
3
4
5
6
7
#! /usr/bin/perl
# zaehl.pl
# Aufruf: perl zaehl.pl datei.txt
while(<>) {
$num += (s/#//g);
}
print $num, "\n";
Das Programm läuft einen Text durch, in dem bestimmte Wörter bzw. Ausdrücke mit ## rechts und links gekennzeichnet sind. Sie müssen gezählt werden. Der Text ist übrigens in der russischen Sprache, darum kann ich hier kein Beispiel einfügen, aber auf Deutsch wäre es in etwa so:
Der Linguist ##Larry Wall## entwarf sie 1987 als Synthese aus C, den ##UNIX-Befehlen## und anderen Einflüssen. Ursprünglich als Werkzeug zur System- und Netzwerkadministration vorgesehen, hat Perl auch bei der Entwicklung von Webanwendungen und in der Bioinformatik weite Verbreitung gefunden. Hauptziele sind eine schnelle Problemlösung und größtmögliche Freiheit für ##Programmierer##. Der Umgang mit Texten und viele frei verfügbare Module sind Stärken der Sprache.
Der nächste Schritt wäre, alle gefundene Ausdrücke in eine Liste zu speichern...