Select Code to Download

sysseek($fh,0,0) returned "0 but true"
sysseek($fh,42,0) returned 42
...
          0E0: bool=false, str=         "0", num=0
          1E0: bool=true , str=         "1", num=1
        "1E0": bool=true , str=       "1E0", num=1

use warnings;
use strict;
...
            sort keys %w).")" : '' );
    };
}