use Perl

• Can't get it to work... :-( perl encoding issue?! (Score:1)

  by RGiersig (3217)

  I tried the naive approach by simply doing
  
  perl -MDigest::MD5 -e 'print Digest::MD5::md5_hex("rgiersig@cpan.org"), "\n"'
  
  which gives me 42675453fde7b6ee681e9c0ded931c00, but this doesn't work. I tried to verify with
  
  perl -MDigest::MD5 -e 'print Digest::MD5::md5_hex("mschwern@cpan.org"), "\n"'
  
  which gives me 61c2a42ed105748d58b7b2f7ac3cd712, but the article says db1a33946e2a8577b8d3377d0715bf61.
  
  An encoding issue?! BTW, I'm runnign 5.8.8 on Linux...
  • Re:Can't get it to work... :-( perl encoding issue (Score:2)

    by schwern (1528)

    Turn on warnings. :) Yes, even in a one-liner. My fingers are practically hard-wired to type "-wle".
    • Re: (Score:1)

      by RGiersig (3217)

      Good advice... thanks! :-)

      But I guess you meant "-we" (which is really easy to type), not "-wle"...

      
      Anyway, now I'm waiting for the positive effect that my gravatar on CPAN [cpan.org] will have on the support requests... ;-)
      • Re: (Score:1)

        by chargrill (7109)

        No, actually the -l gives you a little extra help too, it saves you from having to print "\n".

        So your one-liner could've just been:

        perl -MDigest::MD5 -wle 'print Digest::MD5::md5_hex( q(mschwern@cpan.org) )'
        • Re:Can't get it to work... :-( perl encoding issue (Score:1)

          by Burak (3156) on 2007.09.16 14:46 (#57857) Homepage Journal

          Look ma no quotes :)

          perl -MDigest::MD5 -wle print+Digest::MD5::md5_hex(shift().q(@cpan.org)) burak

          me too [gravatar.com] btw...

          Reply to This

          Parent