Die Webseiten der Fachschaft Informatik am ERG Saalfeld


Zeichen und Zeichenketten (Strings)

Variablen wie z.B. $x (Skalare) können Zahlen oder Strings enthalten. Es soll jetzt die Bearbeitung von Strings (Zeichenketten) demonstriert werden. Dazu soll das folgende Programm genutzt werden.
 

Programm

use strict;
use warnings;

my $str1 = 'internet';
my $str2 = 'SAALFELD';
my $char = 'a';
my $nr   = 98;
my $temp;

#-----------------------------------
# 1. Verknüpfungen u.a.m.
#-----------------------------------

$temp = $str1 . $str2;
print $temp, "\n";

$temp = $str2 . $str1;
print $temp, "\n";

print join('+++', $str1, $str2, $temp, 'ERG', 'Perl'), "\n";

print '#' x 30, "\n";

#-----------------------------------
# 2. Bearbeitung nur von "internet"
#-----------------------------------

print $str1, "\n";
print length($str1), "\n";
print $str1 x 5, "\n";

print uc($str1), "\n";
print ucfirst($str1), "\n";

$temp = reverse($str1);
print $temp, "\n";

$temp = chop($str1);
print $temp, "\n";
print $str1, "\n";

$temp = substr($str1, 4, 2);
print $temp, "\n";

#-----------------------------------
# 3. Bearbeitung nur von "SAALFELD"
#-----------------------------------

print $str2, "\n";

print lc($str2), "\n";
print lcfirst($str2), "\n";

#-----------------------------------
# 4. Bearbeitung nur eines Zeichens
#-----------------------------------

print $char, "\n";
print ord $char, "\n";

print $nr, "\n";
print chr $nr, "\n";

$nr++;
print $nr, "\n";
print chr $nr, "\n";

__END__

 

Aufgaben

  1. Bringen Sie das Programm zum Laufen.
  2. Kommentieren Sie das Programm.
  3. Ändern Sie das Programm so ab, dass auch dem Nutzer deutlich wird, was das Programm macht.
  4. Im Block 2 wird in der 3. Zeile der String 'internet' 5 mal hintereinander ausgegeben. Ergänzen Sie dieses Konstrukt so, dass dazwischen '+++' steht.
  5. Ergänzen Sie das Programm so, das von $str1 nur der 1. Buchstabe geholt wird.
  6. Ergänzen Sie das Programm so, das von $str1 nur der 2. Buchstabe geholt wird.
  7. Ergänzen Sie das Programm so, das von $str1 die beiden letzten Buchstaben geholt werden. Verwenden Sie dabei die Funktion length.
  8. zu Block 4: schreiben Sie ein kleines Programm, welches zu allen Zahlen > 32 und <= 128 das entsprechende Zeichen ausgibt/zuordnet.
  9. Informieren Sie sich über die Steuerzeichen (also die Zeichen zu den Zahlen <= 32)

 

Weblinks

 

zurück


© ERG Saalfeld   -   Hans-Dietrich Kirmse     letztes Update: 4.03.2015