Text abwechselnd in Groß- und Kleinschreibung

6 Lösungen

#27

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

Bitte melden Sie sich an um zur Aufgabenbeschreibung eine Frage zu stellen.

Frage stellen

Bitte melden Sie sich an um eine Lösung einzureichen.

Lösung einreichen

von EEK (460 Punkte) - 18.08.2016 um 10:58 Uhr

Perl-Code

#!/usr/bin/perl
use strict;
use warnings;

my $low_up_control = 0;
my @characters;
my @up_low_sentence;

print "Eingabe: ";
chomp(my $sentence = <STDIN>);

@characters = split('', $sentence);

foreach my $char(@characters){
	if($low_up_control %2 == 0){
		$up_low_sentence[$low_up_control] = lc($characters[$low_up_control]);
	}else{
		$up_low_sentence[$low_up_control] = uc($characters[$low_up_control]);
	}
	$low_up_control++;
}

print "Ausgabe: ";
print @up_low_sentence, "\n";