ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
16.10.2007, 13:42
|
|
Постоянный
Регистрация: 03.08.2007
Сообщений: 367
Провел на форуме:
876216
Репутация:
209
|
|
Согласен, не причем 
Но таки заработало-же... |
|
|
16.10.2007, 19:00
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме:
1985206
Репутация:
963
|
|
Про кавычки для $argv[0] это ваще бред был
|
|
|
|
17.10.2007, 00:48
|
|
Постоянный
Регистрация: 06.06.2006
Сообщений: 515
Провел на форуме:
1985206
Репутация:
963
|
|
это жесть чувак
perldoc IO::Socket
Код:
#!perl
use strict;
use warnings;
use IO::Socket;
my $sock = IO::Socket::INET -> new(LocalAddr => '127.0.0.1', LocalPort => 8080, Listen => 1) || die $!;
while(1)
{
next unless my $conn = $sock -> accept;
while($conn -> connected)
{
...
}
}
Последний раз редактировалось KSURi; 17.10.2007 в 01:25..
|
|
|
|
18.10.2007, 10:05
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
Провел на форуме:
21768337
Репутация:
3486
|
|
Вопрос: Допустим такую ситуацию:
PHP код:
my $var = '55.55';
my ($VR, $VRR) = split(/./,$var);
Следовательно у переменных $VR, $VRR значения == 55 . Но, в скрипте они имеют вид стринговых. Как мне перевести их в целочисленные? |
|
|
|
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: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
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид