[Perl] Новичкам: задаем вопросы

Discussion in 'PHP' started by _Great_, 26 May 2007.

Thread Status:
Not open for further replies.
  1. gisTy

    gisTy Elder - Старейшина

    Joined:
    24 May 2008
    Messages:
    432
    Likes Received:
    160
    Reputations:
    27
    попробуй
    PHP:
    my $checked shared 0;
    PHP:
    $b 1;
    rename($file$b."txt");
    $b++;
    попробуй так, правда я не уверен, ибо давно уже с перлом не общался
     
    #1701 gisTy, 10 Nov 2010
    Last edited: 10 Nov 2010
  2. de_angelo

    de_angelo New Member

    Joined:
    13 Sep 2010
    Messages:
    2
    Likes Received:
    0
    Reputations:
    0
    3.54390929

    lда просто STRом поставь вывод символос с 0 по 4тый и получишь 3.54 - 99.4 и т.д.

    всё гениальное - просто
     
  3. alex_zp

    alex_zp New Member

    Joined:
    5 Nov 2010
    Messages:
    13
    Likes Received:
    0
    Reputations:
    0
    Добрый день.
    В процессе написания партнёрской программы, у каждого партнёра есть свой код, есть баннеры, но они сделаны на флеш. Если бы они были на "gif", вопросов нет, а так не понятно как прописать код партнёра в нём и как отловить его. Подскажите, у кого какие мысли есть на этот счёт.
     
  4. mazaxaka

    mazaxaka Elder - Старейшина

    Joined:
    15 Feb 2008
    Messages:
    268
    Likes Received:
    35
    Reputations:
    0
    чтото и с стр выводит фигню какуето
     
  5. toX1k

    toX1k New Member

    Joined:
    18 Sep 2010
    Messages:
    2
    Likes Received:
    0
    Reputations:
    -1
    почему не пашет?
    Code:
    #!usr/bin/perl
    $dir = "/home/jorik/111/";
    opendir CD, "$dir";
    @a = readdir CD;
    $b = '1';
    foreach $file (@a) { 
     if ($file ne '.' and $file ne '..') {
      open (F, "<", "$dir$file");
      flock F, 1;
      open (S, ">", "$dir$b." . "csv");
      flock S, 2;
          print S "$1;$2;$2;$2\n" if /(https?:\/\/.+?html?)\]?(.+)\[\/url\]/;
        close F;
        close S;
        $b++;
     }
     }
    
     
  6. dupD0M

    dupD0M Elder - Старейшина

    Joined:
    18 May 2010
    Messages:
    1,130
    Likes Received:
    74
    Reputations:
    34
    подскажите хорошую книгу по этому языку что б с примерами и понятно было?
     
  7. SHiNiGaMi

    SHiNiGaMi Banned

    Joined:
    3 Jan 2010
    Messages:
    382
    Likes Received:
    55
    Reputations:
    15
    CamelBook (Программирование на Perl)
     
  8. dupD0M

    dupD0M Elder - Старейшина

    Joined:
    18 May 2010
    Messages:
    1,130
    Likes Received:
    74
    Reputations:
    34
    а ссылочки нет случайно :rolleyes: (она русская или нет?)
     
    #1708 dupD0M, 12 Nov 2010
    Last edited: 12 Nov 2010
  9. SHiNiGaMi

    SHiNiGaMi Banned

    Joined:
    3 Jan 2010
    Messages:
    382
    Likes Received:
    55
    Reputations:
    15
    перевод с английского.
    ссылка вот: http://progbook.ru/perl
    она там 4-ая, там еще куча полезного.
    еще понадобится Perl CookBook(Perl. библиотека программиста)
    ссылка: http://www.knigka.info/2008/03/20/perl-biblioteka-programmista.html
    там куча примеров, (в кэмелбуке даже пара примеров из нее)
     
    #1709 SHiNiGaMi, 12 Nov 2010
    Last edited: 12 Nov 2010
  10. dupD0M

    dupD0M Elder - Старейшина

    Joined:
    18 May 2010
    Messages:
    1,130
    Likes Received:
    74
    Reputations:
    34
    пасиб большое за линки вот ток с библиотеками будет трудно у меня убунту!
     
  11. SHiNiGaMi

    SHiNiGaMi Banned

    Joined:
    3 Jan 2010
    Messages:
    382
    Likes Received:
    55
    Reputations:
    15
    заходи на cpan да качай сколько влезет. В CamelBook даже описано как модули под UNIX ставить
     
  12. mazaxaka

    mazaxaka Elder - Старейшина

    Joined:
    15 Feb 2008
    Messages:
    268
    Likes Received:
    35
    Reputations:
    0
    как засавить перл скрипты работать через proxyfier?
     
  13. eden

    eden New Member

    Joined:
    9 Jan 2010
    Messages:
    26
    Likes Received:
    1
    Reputations:
    0
    так же, как и остальные проги - включить proxyfier :) там все можно настроить, как надо
     
  14. eden

    eden New Member

    Joined:
    9 Jan 2010
    Messages:
    26
    Likes Received:
    1
    Reputations:
    0
    Тут их штук 15 :) на русском
     
  15. mazaxaka

    mazaxaka Elder - Старейшина

    Joined:
    15 Feb 2008
    Messages:
    268
    Likes Received:
    35
    Reputations:
    0
    пробывал. на разных настройках. не хочит работать перл через пркосифиер
     
  16. eden

    eden New Member

    Joined:
    9 Jan 2010
    Messages:
    26
    Likes Received:
    1
    Reputations:
    0
    Опиши тогда свою проблему поподробнее, какие скрипты, какие настройки, что проксифиер пишет? а так слишком мало инфы, чтобы помоч
     
  17. mazaxaka

    mazaxaka Elder - Старейшина

    Joined:
    15 Feb 2008
    Messages:
    268
    Likes Received:
    35
    Reputations:
    0
    обычный скрипт чекера.
    проксифиер запущен. опера, мозила, ася работают через него. запускаю скрипт. в проксифиере не видно. смотру работает захожу на тестовую ссылку. мой ип впн, а не сокса. пробывал создавать разные правила результат один и тотже. ОС вин 7
     
  18. eden

    eden New Member

    Joined:
    9 Jan 2010
    Messages:
    26
    Likes Received:
    1
    Reputations:
    0
    mazaxaka вот, может пригодится: https://forum.antichat.ru/thread13644.html
     
  19. SHiNiGaMi

    SHiNiGaMi Banned

    Joined:
    3 Jan 2010
    Messages:
    382
    Likes Received:
    55
    Reputations:
    15
    попробуй
    Code:
    $line=~ m/<a.*>(http://.*?)<img.*>/i;
    
     
  20. dpe_x

    dpe_x Elder - Старейшина

    Joined:
    8 Sep 2010
    Messages:
    155
    Likes Received:
    35
    Reputations:
    14
    /nofollow">\r\n(.*)\r\n<img src="http:\/\/asd/

    $1 будет твоя ссылка

    а вообще вот

    http://regexpr.ru/
    может поможет
    проверить можно онлайн регулярку
     
Thread Status:
Not open for further replies.