Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • Unless you really need the speed, I go with pure Perl and avoid the issue completely. Have you benchmarked the difference?
    • BTW, all tests pass on Solaris 10 using Sun Studio compiler 12 and a 32-bit Perl. Here's minor patch #1:

      >diff -u _rijndael.orig _rijndael.c
      --- rijndael.orig       Fri Oct 12 14:00:48 2007
      +++ _rijndael.c Fri Oct 12 14:03:50 2007
      @@ -422,7 +422,7 @@
           e = wtxt[j] & 0xff;
           e |= (wtxt[idx[1][j]]) & (0xff << 8);
           e |= (wtxt[idx[2][j]]) & (0xff << 16);
      -    e |= (wtxt[idx[3][j]]) & (0xff << 24);