Select Code to Download

$ perl -e'
   use feature qw( say );
...
94031376424552
94031376229560
94031376424552

$ perl -e'
   use feature qw( say );
...
2                Value of pre-local $x
94300947464040   $x is restored
2                Value of pre-local $x

$ perl -e'
   use feature qw( say );
...
3                Value of pre-local $! (aka value of errno)
93839899443048   $! is restored
3                Value of pre-local $! (aka value of errno)