Select Code to Download

use strict;
use warnings;
...
__EOI__

Dump(f());

>perl -MInline=FORCE,NOISY,NOCLEAN a.pl
...
...
    MAX = -1
    ARYLEN = 0x0
    FLAGS = (REAL)