 |
|

18.10.2007, 10:15
|
|
Познающий
Регистрация: 14.10.2007
Сообщений: 47
Провел на форуме: 91186
Репутация:
18
|
|
Вычти из ни НОЛЬ.
|
|
|

18.10.2007, 10:20
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
Провел на форуме: 21768337
Репутация:
3486
|
|
Сообщение от FlyBird
Вычти из ни НОЛЬ.
Как я могу из них ноль вычесть если они стринговые? Ты прочитай внимательно вопрос.
|
|
|

18.10.2007, 10:24
|
|
Banned
Регистрация: 03.08.2007
Сообщений: 313
Провел на форуме: 951141
Репутация:
291
|
|
Но, в скрипте они имеют вид стринговых
причем тут но?
а еще можешь умножить на 1=)
Просто попробуй то что тебе сказали...
|
|
|

18.10.2007, 11:05
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
Провел на форуме: 21768337
Репутация:
3486
|
|
Вот давайте вы все эти манипуляции сделаете с
PHP код:
#!/usr/bin/perl
use strict;
my $var = <STDIN>;
chomp(my ($VR, $VRR) = split(/./,$var));
А потом обсудим, ок?
Последний раз редактировалось [sL1p]; 18.10.2007 в 11:07..
|
|
|

18.10.2007, 11:10
|
|
Познающий
Регистрация: 14.10.2007
Сообщений: 47
Провел на форуме: 91186
Репутация:
18
|
|
$VR = $VR - 0;($VR = $VR *1 
$VRR = VRR*1($VRR = VRR - 0
Вот мой пример:
где $str я могу ввести хоть "Привет)))";
echo"<br>Проверка ".$str;
echo"<br>".gettype($str);
$str = $str - 0;
echo"<br>".gettype($str);
Ты главное попробуй и все!
|
|
|

18.10.2007, 11:21
|
|
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме: 4094601
Репутация:
495
|
|
2 [sL1p]
ИМХО красивей
Код:
#!/usr/bin/perl -w
use strict;
use warnings;
my( $var,$VR,$VRR ) = ( 55.55,undef,undef );
($VR,$VRR ) = split(/\./,$var);
printf "Sum : %d \n",$VR+$VRR;
Твой случай:
Код:
#!/usr/bin/perl
use strict;
my $var = <STDIN>;
chomp(my ($VR, $VRR) = split(/\./,$var));
printf "Sum : %d \n",$VR+$VRR;
Извиняюсь если неправильно понял, но если суммируем два числа значит они вещественного типа.
|
|
|

18.10.2007, 11:24
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
Провел на форуме: 21768337
Репутация:
3486
|
|
Сообщение от demonoid
2 [sL1p]
ИМХО красивей
Код:
#!/usr/bin/perl -w
use strict;
use warnings;
my( $var,$VR,$VRR ) = ( 55.55,undef,undef );
($VR,$VRR ) = split(/\./,$var);
printf "Sum : %d \n",$VR+$VRR;
Твой случай:
Код:
#!/usr/bin/perl
use strict;
my $var = <STDIN>;
chomp(my ($VR, $VRR) = split(/\./,$var));
printf "Sum : %d \n",$VR+$VRR;
Извиняюсь если неправильно понял, но если суммируем два числа значит они вещественного типа.
Ну о красоте я буду думать после окончания написания кода(: Я понял в чём была ошибка:
split(/ \./
Thx
|
|
|

18.10.2007, 15:07
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
Провел на форуме: 6144796
Репутация:
1095
|
|
>> Следовательно у переменных $vr, $vrr значения == 55 . Но, в скрипте они имеют вид стринговых. Как мне перевести их в целочисленные?
интерпретатор сам интерепретирует переменные в нужном контексте..
>> Мог бы ио поставить + (((
а лучше б минус за такие "советы"..
>> ИМХО красивей
красивей если 2 раза ворнингс заюзать и присваивать всем новым переменные undef, хотя они и так имеют значение undef? и у слипа вроде как через stdin передавалось, красивей чтоли явно в скрипте значение прописать?
Последний раз редактировалось Digimortal; 18.10.2007 в 15:12..
|
|
|

18.10.2007, 16:58
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме: 1985206
Репутация:
963
|
|
В перле нет целочисленного типа данных. Есть скаляр, а это и стринги и инты.
Вот.
ЗЫ:
Код:
my($a, $b) = ('a', 1);
print $a++, $b++
|
|
|

18.10.2007, 18:44
|
|
Members of Antichat - Level 5
Регистрация: 09.10.2006
Сообщений: 1,698
Провел на форуме: 9098076
Репутация:
4303
|
|
Предположим у меня есть массив полученный из файла. Предположим есть 10 потоков. Как разбить этот массив на 10 частей и что бы каждый поток работал со своей частью?
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|