אתה נמצא כאן יסודות השפה  »  פורמטים  »  שדות המשתנים - שדות הטקסט

שדות המשתנים - שדות הטקסט

>>>>>@ מציין שדה עם מקום לשישה תווים. (סופרים גם את ה @) במקרה בו יש לנו ערך עם פחות תווים, למשל שניים, הם ייושרו לימין ומימינם יופיעו ארבעה רווחים.

<<<<<@ מציין שהערך יופיע מימין והרווחים ירפדו את הערך משמאלו. אם הערך מכיל יותר משישה תווים - הוא יקוצץ.

||||||@ ממרכז את הערך ומרפד אותו ברווחים משני הכוונים.

עבור מספרים דצימליים נשתמש בצורה הבאה

format D_NUM =
========================================
| number :@#####.##
| $number
========================================
.

לאבחנה בין מספרים שליליים לחיוביים ניתן לכתוב:

format D_NUM =
========================================
| number :@<<<<<<<
/*נשמרים להכל יחד שמונה תוים*/

| &calculate($number) #תוכנס התוצאה שהסאברוטינה תחזיר
========================================
.

sub calculate {
     local ($number)=@_; #הפרמטר שהפונקציה קיבלה
    $number = sprintf("%.2f", $number);
     if ( $number <0 )
         sprintf("%4
/* מתוך שמונת התוים שנשמרו ארבעה ינוצלו למספר ועוד שניים נשמרים בשביל המינוס והנקודה העשרונית שניים נוספים נשמרים למספרים מימין לנקודה.*/
.<<.2f"
, -$number);
/* המספר יודפס עם מינוס.*/

     else
         sprintf(" %4.2f" , $number);
/* לפני המספר יודפס רווח במקום מינוס.*/

}
# : גוף התכנית
$number=10.64;









להוספת תגובה, אנא התחברו לדרכונט.