perl -MDevel::Peek -e'$!=1; print("$!\n"); Dump($!);'

##</code><code>##

...
  FLAGS = (GMG,SMG,pNOK,pPOK)
...

##</code><code>##

...
  FLAGS = (GMG,SMG,NOK,POK,pNOK,pPOK)
...