Perl

Discussion in 'Болталка' started by <Cyber-punk>, 19 Nov 2009.

  1. <Cyber-punk>

    <Cyber-punk> Smash the Stack

    Joined:
    1 Oct 2009
    Messages:
    658
    Likes Received:
    315
    Reputations:
    430
    какой код должен быть на perl чтоб пользователь вводил символы а из него в md5 :confused:
    Знаю как на пхп а как на перле ???
     
    _________________________
    #1 <Cyber-punk>, 19 Nov 2009
  2. Kaimi

    Kaimi Well-Known Member

    Joined:
    23 Aug 2007
    Messages:
    1,732
    Likes Received:
    809
    Reputations:
    231
    http://search.cpan.org/~gaas/Digest-MD5-2.39/MD5.pm
     
    _________________________
    #2 Kaimi, 19 Nov 2009
  3. Sharky

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

    Joined:
    1 May 2006
    Messages:
    487
    Likes Received:
    312
    Reputations:
    46
    PHP:
     use Digest::MD5  qw(md5);
         $digest = md5($data)
     
    #3 Sharky, 19 Nov 2009
(You must log in or sign up to post here.)