Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl 
    
    ...
    is( $db->{B}, "\xA0",     "8-bit val (UTF8=0)" );
    is( $db->{C}, "\xA0",     "8-bit val (UTF8=1)" );
    is( $db->{D}, "\x{2660}", "32-bit val" );
    
  2. or download this
    1..8
    Wide character in print at /home/eric/lib/perl5/DBM/Deep/File.pm line 
    +193.
    # Looks like your test exited with 9 before it could output anything.