HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

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

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

  #1  
Старый 07.11.2009, 18:44
Vlad&slav
Участник форума
Регистрация: 01.01.2009
Сообщений: 138
Провел на форуме:
817404

Репутация: 82
Отправить сообщение для Vlad&slav с помощью ICQ
По умолчанию

у нас 3 файла в одном в столбик одни слова в другом в столбик другие, надо для каждого слова из первого дописать через звёздочку каждое слово из второго и всё получившееся записать в третий фаил

#!/usr/bin/perl
my $a = '1,txt'; # c тем к чему приписываем
my $b = '2.txt'; # c тем что приписываем
my $w = 'end.txt'; # куда всё запишится

open(log,>>$w);
while($a)
{
print log .....;
}
close(log);

я перл не знаю )
 
Ответить с цитированием

  #2  
Старый 07.11.2009, 21:56
GenTao
Участник форума
Регистрация: 10.10.2009
Сообщений: 133
Провел на форуме:
143706

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

Как соединиться с сервером (google.ru,80 например) без использования сокетов ? Геморрно писать это по памяти ) Через ООП можно как-то,но я пока не понимаю,как юзать...пример всё равно нужен(.
 
Ответить с цитированием

  #3  
Старый 07.11.2009, 22:06
Pashkela
Динозавр
Регистрация: 10.01.2008
Сообщений: 2,841
Провел на форуме:
9220514

Репутация: 3338


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

#!/usr/bin/perl
use LWP::Simple;
$content = get("http://google.ru/");
die "Couldn't get it!" unless defined $content;
print $content;
 
Ответить с цитированием

  #4  
Старый 07.11.2009, 22:34
GenTao
Участник форума
Регистрация: 10.10.2009
Сообщений: 133
Провел на форуме:
143706

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

Кул...респект Пашке.А LWP::Simple - это пакет или модуль ? Извини за глупый вопрос. И есть ли где-то описания модулей на русском ?
 
Ответить с цитированием

  #5  
Старый 07.11.2009, 22:53
Pashkela
Динозавр
Регистрация: 10.01.2008
Сообщений: 2,841
Провел на форуме:
9220514

Репутация: 3338


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

http://www.opennet.ru/base/dev/perl_lwp.txt.html
 
Ответить с цитированием

  #6  
Старый 08.11.2009, 01:33
GenTao
Участник форума
Регистрация: 10.10.2009
Сообщений: 133
Провел на форуме:
143706

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

А как принять пользовательский ввод от пользователя с консоли,чтобы в метод get() подставлялась переменная с переданным значением ?

Например,есть тот же код:

PHP код:

#!/usr/bin/perl

use LWP::Simple;

$content get("http://google.ru");

print 
$content;

system("PAUSE"); 
 
Ответить с цитированием

  #7  
Старый 08.11.2009, 02:05
Pashkela
Динозавр
Регистрация: 10.01.2008
Сообщений: 2,841
Провел на форуме:
9220514

Репутация: 3338


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

#!/usr/bin/perl
use LWP::Simple;
print "Enter URL:\n";
$choice = <STDIN>;
chomp $choice;
$content = get($choice);
die "Couldn't get it!" unless defined $content;
print $content;
 
Ответить с цитированием

  #8  
Старый 08.11.2009, 02:20
eLWAux
Постоянный
Регистрация: 15.06.2008
Сообщений: 941
Провел на форуме:
5111568

Репутация: 2399


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

Цитата:
Сообщение от Pashkela  
$choice = <STDIN>;
chomp $choice;
PHP код:
chomp($choice = <>); 
 
Ответить с цитированием

  #9  
Старый 08.11.2009, 02:24
GenTao
Участник форума
Регистрация: 10.10.2009
Сообщений: 133
Провел на форуме:
143706

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

Пасип большое,Pashkela
 
Ответить с цитированием

  #10  
Старый 08.11.2009, 02:36
GenTao
Участник форума
Регистрация: 10.10.2009
Сообщений: 133
Провел на форуме:
143706

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

Такая проблема:

Есть,к примеру,4 функции,вычисляющие сумму,разность,деление и вычитание от двух аргументов.Объявил все функции в модуле.Как теперь получить к ним доступ из пакета (а также переменным в каждой функции) ? Нужен рабочий пример.Вместо реальных функции можно использовать гипотетические - (sum,del и т.д.).
Если я объявляю,скажем,переменную (обычную) в модуле,скажем,KE.pl,а в исполняемом скрипте использую директиву use,то :: можно не использовать,а сразу использовать переменную как лексическую(как будто бы модуля и вовсе нет...).А когда же тогда использовать :: ?
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[c/c++] Новичкам: задаем вопросы _Great_ С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 5421 21.04.2026 07:37
[php] Новичкам: задаем вопросы _Great_ PHP 16396 17.06.2010 21:19
Вопросы по Ipb 2.0 Voodoo_People Уязвимости CMS / форумов 26 15.02.2005 22:57



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


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




ANTICHAT.XYZ