ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование_OLD > PHP, PERL, MySQL, JavaScript
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #441  
Старый 11.05.2008, 20:33
GreenBear
наркоман с медалью
Регистрация: 07.05.2005
Сообщений: 3,704
Провел на форуме:
19975136

Репутация: 4536


Отправить сообщение для GreenBear с помощью ICQ
По умолчанию

perl -c file.pl
 

  #442  
Старый 15.05.2008, 23:24
Vid0k
Постоянный
Регистрация: 24.12.2007
Сообщений: 574
Провел на форуме:
3186852

Репутация: 316


Отправить сообщение для Vid0k с помощью ICQ
По умолчанию

у мя вапрос странный
можно в перле скрипты подключать динамически те по мере неоходимости
чтобы память не засорять
 

  #443  
Старый 16.05.2008, 00:19
biophreak
Постоянный
Регистрация: 03.08.2007
Сообщений: 367
Провел на форуме:
876216

Репутация: 209
По умолчанию

копай в сторону eval + require, имхо
 

  #444  
Старый 16.05.2008, 00:23
astrologer
Постоянный
Регистрация: 30.08.2007
Сообщений: 773
Провел на форуме:
3069349

Репутация: 808


По умолчанию

Код:
do 'file.pl';
Код:
eval `cat file.pl`;
 

  #445  
Старый 16.05.2008, 11:14
$p01nt
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540

Репутация: 96
По умолчанию

допустим есть текстовой файл в котором через пробел записаны два числа (5 6) как получить эти числа т.е. что б в переменной x было 5 ($x=5) в переменной y было 6 (y=6)
 

  #446  
Старый 16.05.2008, 11:26
krypt3r
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186

Репутация: 905


По умолчанию

Как-то так
Код:
#$str = "5 6";
if ($str =~ /(\d+)\s+(\d+)/)
{
  $x = $1;
  $y = $2;
}
 

  #447  
Старый 16.05.2008, 11:30
$p01nt
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540

Репутация: 96
По умолчанию

krypt3r, спасибо - сейчас попробую ! И еще вопросик, где можно почитать статьи по перлу на русском ? и подскажите ирк каналы по перлу ... статьи искал в гугле - ничего интересного (
 

  #448  
Старый 16.05.2008, 14:43
biophreak
Постоянный
Регистрация: 03.08.2007
Сообщений: 367
Провел на форуме:
876216

Репутация: 209
По умолчанию

Код:
my $str = "5 6";
my($x,$y) = split ' ', $str;
print "x = $x, y = $y\n";
Чтоб регекспами не забивать код
 

  #449  
Старый 16.05.2008, 15:05
Chuck
Banned
Регистрация: 23.07.2007
Сообщений: 87
Провел на форуме:
2147329

Репутация: 613
По умолчанию

$p01nt,
Код:
($a,$b) = qw(5 6);
print $a."\n".$b;
 

  #450  
Старый 16.05.2008, 15:47
biophreak
Постоянный
Регистрация: 03.08.2007
Сообщений: 367
Провел на форуме:
876216

Репутация: 209
По умолчанию

ы, тоже как вариант ))
 
 





Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ