|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Slava Gorbanev 2:5057/19.20 23 Jun 2002 09:46:45 To : Nikolay Pichtin Subject : Операции над числами -------------------------------------------------------------------------------- Saturday June 22 2002 17:48, Nikolay Pichtin writes: NP> Есть: ой. ты бы книжку какую-нибудь почитал что ли. в крайнем случае perldoc perldata. собственно, прогон скрипта через perl -wc уже показывает, что что-то не в порядке. NP> my $r1 = (31,4046); $r1 присваивается 4046 (последний элемент списка 31, 4046). NP> my $r2 = (31,3970); $r2 присваивается 3970. NP> print scalar $r1-$r2; выражение scalar $что_угодно -- это масло масляное. значок `$' сам по себе означает скалярную переменную. про scalar расскажут в perldoc -f scalar. NP> В результате получаем 76, а не 0.0076 Если же без scalar, то NP> получаем 0. и без scalar должно быть 76. чтобы имело смысл говорить о замене `,' на `.', у тебя на входе должна быть строка: $a = '31,4046'; $b = '31,3970'; $a =~ s/,/./; $b =~ s/,/./; print $a - $b; в арифметических выражениях перл автомагически преобразует строку в число. -- rnd, hardcore necromancer: склепики, гробики, саркофагики... --- GoldED+/W32 snapshot-2001.5.29 * Origin: FTS-0004 compliant system (2:5057/19.20) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/33183d1558d1.html, оценка из 5, голосов 10
|