Select Code to Download

$ alias perle
alias perle='perl -Mstrict -Mwarnings -Mautodie=:all -MCarp::Always -E
+'

$ perle 'use re "debug"; my $re = qr[\p{Numeric_Value: 3.12e-03}];'
Compiling REx "\p{Numeric_Value: 3.12e-03}"
...
   3: END (0)
stclass ANYOFH[0BF0 0D70 1372 2169 2179 2469 247D 2491 24FE 277F 2789 
+2793 3038 3229 3248 3289 4EC0 5341 62FE F973 F9FD 10110 10149 10150 1
+0157 10160-10164 102EA 10322 103D3 1085B 1087E 108AD 108FD 10917 109C
+9 10A44 10A9E 10AED 10B5C 10B7C 10BAD 10CFC 10E69 10F22 10F52...] (Fi
+rst UTF-8 byte=E0-FF) minlen 1
Freeing REx: "\p{Numeric_Value: 10}"

#!/usr/bin/env perl

...
    print 'Numeric_Value:  ', charprop($code_point, 'Numeric_Value'), 
+"\n";
    print '-' x 40, "\n";
}

Char '0'
Numeric_Type:  Decimal
...
Numeric_Type:  None
Numeric_Value:  NaN
----------------------------------------