Select Code to Download

use strict;
use warnings;
...
is( xs_edistance('four',''), 1, 'kgjsdfjkdsafs');
is( xs_edistance('','four'), 1, 'kgjsdfjkdsafs');
is( xs_edistance('',''), 1, 'kgjsdfjkdsafs');

1..17
Malformed UTF-8 character (unexpected non-continuation byte 0x01, imme
+diately af
...
Out of memory!
Out of memory!
*CRASH*

start byte) in subroutine entry at n1.pl line 9.
Malformed UTF-8 character (unexpected continuation byte 0xa8, with no 
+preceding
...
start byte) in subroutine entry at n1.pl line 9.
Malformed UTF-8 character (unexpected continuation byte 0xa8, with no 
+preceding
start byte) in subroutine entry at n1.pl line 9.

     ntdll.dll!_RtlAllocateHeap@12()  + 0x26916    
     msvcr71.dll!_heap_alloc(unsigned int size=124)  Line 212    C
...
     perl517.dll!RunPerl(int argc=2, char * * argv=0x01345c98, char * 
+* env=0x00343f70)  Line 275    C
     perl.exe!mainCRTStartup()  Line 398 + 0xe    C
     kernel32.dll!_BaseProcessStart@4()  + 0x23

>    Unicode.dll!enc_pack(interpreter * my_perl=0x00342c14, sv * resul
+t=0x00000000, unsigned int size=11343540, unsigned char endian='V', u
+nsigned long value=86)  Line 104    C
     Unicode.dll!XS_Encode__Unicode_encode_xs(interpreter * my_perl=0x
+00342c00, cv * cv=0x00ad0d34)  Line 378 + 0x16    C
...
     perl517.dll!RunPerl(int argc=2, char * * argv=0x01345c98, char * 
+* env=0x00343f70)  Line 270 + 0x6    C
     perl.exe!mainCRTStartup()  Line 398 + 0xe    C
     kernel32.dll!_BaseProcessStart@4()  + 0x23