Einzelnen Beitrag anzeigen
Alt 20.03.2009, 11:20   #1
RaistlinMajere
Inventar
 
Registriert seit: 06.04.2001
Alter: 44
Beiträge: 2.343


Standard Perl Formate: Frage zu zeilenweiser Ausgabe

angenommen ich möchte die ergebnisse mathematischer berechnungen ausgeben lassen, so funktioniert das, wenn ichs in einer einzigen zeile ausgeben lasse, z.b. so:
Code:
my $zahl = 10;
write;

format STDOUT =  
normal: @> hoch2: @>> hoch3: @>>>
{
$x,
$x*$x,
$x*$x*$x
}
.
das passt so weit.
wenn ich jedoch diese ergebnisse zeilenweise und nicht nebeneinander in einer zeile ausgeben lassen will, funzts nicht so, wie ich mir das gedacht habe.
Code:
my $zahl = 10;
write;

format STDOUT =  
normal: ^>
hoch2: ^>>
hoch3: ^>>>
{
$x,
$x*$x,
$x*$x*$x
}
.
kann mir jemand erklären, wie ich das hier machen müßte, damits klappt?
ich hab mir schon gedacht, daß es vllt. daran liegen könnte, daß bei einer zeilenweisen ausgabe die entsprechend eingesetzte variable sofort nach der formatdefinition angegeben werden muß:
Code:
my $zahl = 10;
write;

format STDOUT =  
normal: ^>
$x
hoch2: ^>>
{$x*$x}
hoch3: ^>>>
{$x*$x*$x}
.
das klappt aber leider auch nicht.
____________________________________
"Life is like a box of rockets," said the Marine. "You never know what you´re gonna ret."
Then he pulled the trigger of his BFG9000.
RaistlinMajere ist offline   Mit Zitat antworten