Hi Leute,
fange gerade damit an, Perl zu lernen. Bin, was Programmieren angeht ziemlicher Neuling und finde bei einer Aufgabe den Fehler einfach nicht.
Aufgabenstellung war folgende:
Das ganze sieht momentan so aus:
![shell]()
Konsole
![]()
Er gibt mir jetzt die Fehlermeldung:
Die verstehe ich ja auch vollkommen, aber wie muss ich diese Zeile
denn jetzt verändern?
Danke schonmal im Vorraus
LG: Freki
fange gerade damit an, Perl zu lernen. Bin, was Programmieren angeht ziemlicher Neuling und finde bei einer Aufgabe den Fehler einfach nicht.
Aufgabenstellung war folgende:
Zitat:
|
Schreiben Sie ein Programm, das Sterne in Keilform ausgibt. Der Anwender gibt die Anfangszahl für die Sterne ein und das Programm gibt Zeilen von Sternen aus, wobei jede Zeile einen Stern weniger hat, als die vorhergehende. Beispiel: Anfangszahl der Sterne: 7 ******* ****** ***** **** *** ** * |
Das ganze sieht momentan so aus:
Konsole
#!/usr/local/bin/perl -w
use strict;
use warnings;
my $star = "*";
print "Anfangszahl der Sterne: \n";
my $number = <STDIN>;
chomp($number);
while ($number != 0) {
print "$number"*"$star";
$number--;
print $number
}
Er gibt mir jetzt die Fehlermeldung:
Code:
Argument "*" isn't numeric in multiplication (*) at Aufgabe1 line 34, <STDIN> line 1.Code:
(print "$number"*"$star";)Danke schonmal im Vorraus
LG: Freki