Perl :: Aufgabe #27 :: Lösung #4

6 Lösungen Lösungen öffentlich
#27

Text abwechselnd in Groß- und Kleinschreibung

Anfänger - Perl von Dome - 29.12.2012 um 01:34 Uhr
Schreiben Sie ein Programm, welches einen eingegeben Text so manipuliert, das der Text abwechselnd in Groß- und Kleinschreibung auf den Bildschirm ausgegeben wird.

Konsolenausgabe:

Texteingabe: Beispieltext
Textausgabe: BeIsPiElTeXt
#4
vote_ok
von Kimaro (520 Punkte) - 24.10.2014 um 11:50 Uhr
Quellcode ausblenden Perl-Code

#!/usr/bin/perl

use strict;
use warnings;

my $c = 0;
my $zahler = 0;

print "geben Sie einen Text ein: ";
my $x = <STDIN>;
chomp $x;
my @arr = split(//,$x);
foreach (@arr){
	$zahler++;
	if ($zahler % 2){
		print "$_";
	}
	else {
		print ucfirst "$_";
	}
	
}

print "\n";



#Beenden des Programms
print "zum Beenden enter druecken";
<STDIN>

Kommentare:

Für diese Lösung gibt es noch keinen Kommentar

Bitte melden Sie sich an um eine Kommentar zu schreiben.
Kommentar schreiben