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

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

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

    Xeeper New Member

    Joined:
    6 Mar 2005
    Messages:
    19
    Likes Received:
    2
    Reputations:
    0
    попробовал, да, именно так
     
  2. Roba

    Roba Banned

    Joined:
    24 Oct 2007
    Messages:
    237
    Likes Received:
    299
    Reputations:
    165
    вообщем такая проблема
    Code:
    #!/usr/bin/perl
    use strict;
    use warnings;
    use Net::FTP;
    my $serv = "ftp.site.com" ;
    my $ftp = NET::FTP->new($serv) || print "Error connect" ;
    $ftp->login("user","pass") || print "Error login";
    
    Code:
    Can't locate object method "new" via package "NET::FTP" (perhaps you forgot to l
    oad "NET::FTP"?) at C:\WebServers\home\localhost\cgi\ftp.pl line 4.
    На машине стоит Denwer, и отдельно ставил ActivePerl-5.10.0 брал отсюда activestate.com, т.е. по идее должен быть не резанным.
    В \usr\lib\Net\ FTP.pm присутствует, и cаб new в нем тоже есть.

    Проблема решена.
    Digimortal, спасибо !
     
    #362 Roba, 17 Mar 2008
    Last edited: 17 Mar 2008
  3. Digimortal

    Digimortal Banned

    Joined:
    22 Aug 2006
    Messages:
    471
    Likes Received:
    248
    Reputations:
    189
    напиши Net::FTP заместо NET::FTP
     
    2 people like this.
  4. $p01nt

    $p01nt Elder - Старейшина

    Joined:
    19 Feb 2008
    Messages:
    116
    Likes Received:
    20
    Reputations:
    1
    как установить модуль Perl ?! напримере Net::Icq
     
  5. Spyder

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

    Joined:
    9 Oct 2006
    Messages:
    1,388
    Likes Received:
    1,209
    Reputations:
    475
    ppm install Net-ICQ
    в консоли
     
  6. $p01nt

    $p01nt Elder - Старейшина

    Joined:
    19 Feb 2008
    Messages:
    116
    Likes Received:
    20
    Reputations:
    1
    как отправить сообщение в аську ?
     
  7. KSURi

    KSURi tnega AOLPS

    Joined:
    6 Jun 2006
    Messages:
    458
    Likes Received:
    219
    Reputations:
    357
    запустить квип/миранду/етц, выбрать нужный контакт (если его нет, то стоит воспользоваться поиском и добавить клиент в контакт лист), в появившемся окне набрать текст и нажать кнопку послать/отправить
     
    2 people like this.
  8. $p01nt

    $p01nt Elder - Старейшина

    Joined:
    19 Feb 2008
    Messages:
    116
    Likes Received:
    20
    Reputations:
    1
    подскажите как в строке
    <input type="hidden" name="sid" value="01a36e4d002d26dd4e1621d5ef495f19"/>

    найти 01a36e4d002d26dd4e1621d5ef495f19 ?
     
  9. demonoid

    demonoid Banned

    Joined:
    12 Jan 2007
    Messages:
    101
    Likes Received:
    111
    Reputations:
    27
    Code:
    perl -e "s\\<input type=\"hidden\" name=\"sid\" value=\"01a36e4d002d26dd4e1621d5ef495f19\"/>\;print /name=\"sid\" value=\"([a-f0-9]{32})\"\/>/"
     
    #369 demonoid, 24 Mar 2008
    Last edited: 24 Mar 2008
  10. KSURi

    KSURi tnega AOLPS

    Joined:
    6 Jun 2006
    Messages:
    458
    Likes Received:
    219
    Reputations:
    357
    а просто $_='...' уже не модно чтоли? типа чем больше кавычек эскейпишь, тем более одейнее?
     
  11. demonoid

    demonoid Banned

    Joined:
    12 Jan 2007
    Messages:
    101
    Likes Received:
    111
    Reputations:
    27
    пытался полностью соответствовать условию:
    Code:
    C:\>perl -e "$_ = "tipa" ; print "
    tipa
    
    Code:
    C:\>perl -e "$_ = '\"tipa\"' ; print "
    "tipa"
    perl golf

    Code:
    s\\<input type=\"hidden\" name=\"sid\" value=\"01a36e4d002d26dd4e1621d5ef495f19\"/>\ 
    84
    Code:
    $_='<input type=\"hidden\" name=\"sid\" value=\"01a36e4d002d26dd4e1621d5ef495f19\"/>'
    85 :p
    пс : интересен твой вариант
     
  12. NOmeR1

    NOmeR1 Everybody lies

    Joined:
    2 Jun 2006
    Messages:
    1,068
    Likes Received:
    783
    Reputations:
    213
    \w - это [a-z]
     
  13. NOmeR1

    NOmeR1 Everybody lies

    Joined:
    2 Jun 2006
    Messages:
    1,068
    Likes Received:
    783
    Reputations:
    213
    Ну я к тому, что md5 или сессия состоит из символов a-f и цифр 0-9
     
  14. KSURi

    KSURi tnega AOLPS

    Joined:
    6 Jun 2006
    Messages:
    458
    Likes Received:
    219
    Reputations:
    357
    @NOmeR1
    \w это [a-zA-Z_] если быть точным

    @demonoid
    а ты знаешь почему без кавычек печатается?
     
  15. krypt3r

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

    Joined:
    27 Apr 2007
    Messages:
    1,507
    Likes Received:
    389
    Reputations:
    101
    Нда? А куда пропали 0-9? Если быть более точным, то \w = [a-zA-Z0-9_]
     
  16. Roba

    Roba Banned

    Joined:
    24 Oct 2007
    Messages:
    237
    Likes Received:
    299
    Reputations:
    165
    \w - [a-zA-Z0-9_] вот так правильно
     
  17. KSURi

    KSURi tnega AOLPS

    Joined:
    6 Jun 2006
    Messages:
    458
    Likes Received:
    219
    Reputations:
    357
    ну да, про 0-9 забыл
     
  18. ZET36

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

    Joined:
    8 Oct 2007
    Messages:
    250
    Likes Received:
    49
    Reputations:
    0
    Подскажите как в перле получить доступ к реестру винды. ну точнее как должен выглядить путь к нему. заранее спасибо
     
  19. azote

    azote New Member

    Joined:
    28 Mar 2008
    Messages:
    20
    Likes Received:
    0
    Reputations:
    0
    :)
     
    #379 azote, 31 Mar 2008
    Last edited: 31 Mar 2008
  20. krypt3r

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

    Joined:
    27 Apr 2007
    Messages:
    1,507
    Likes Received:
    389
    Reputations:
    101
    Азот, ты темой ошибся, тут вопросы по перлу
     
Thread Status:
Not open for further replies.