2 # -----------------------------------------------------------------------------
5 use lib
($0 =~ m
|^(.*/)| ?
$1 : ".");
9 { local $/; $expected = <DATA
>; }
11 &message
("Checking handling of non-ascii numbers.");
12 &sstest
("test_nonascii_numbers", $expected);
15 -----------------------------------------------------------------------------
16 Start
: test_nonascii_numbers
17 -----------------------------------------------------------------------------
20 End
: test_nonascii_numbers