Programmieraufgaben für Perl-Anfänger:
Aufgabe 6: Schreiben Sie ein Programm, das ein Wort einliest. Das Wort wird dann so oft ausgegeben, wie es Buchstaben hat: Geben Sie ein Wort ein: Hello Hello Hello Hello Hello Hello Lösung:
#! /usr/bin/perl
use strict;
use warnings;
print "Geben Sie ein Wort ein:\n";
my $wort = <STDIN>;
chomp($wort);
print "\n";
for(0..length($wort)-1){
print $wort,"\n";
}
|