Select Code to Download

use strict;
use warnings;
...
00AE 00AF 00B0 00B1 00B2 00B3 00B4 00B5 00B6 00B7 00B8 00B9 00BA 00BB 
+00BC 
00BD 00BE 00BF 00D7 00E6 00E7 00F0 00F7 00F8 0127 0131 014B 0153 0192 
+019B 
01C0 01C1 01C2 01C3 0237 0238 0239 023C 0240 0250 0251 0252 0253 0254 
+0255

160 191
215 215
...
295 295
305 305
331 331

use v5.12;
use strict;
...
247 248
295 295
305 305

while( <DATA> ) {
    my ( $low, $high ) = split;
    push @cp_ints, $low .. $high;
}