> perl -de 0
...
  DB<1> x require 'con'
'this is true';
^Z
0  'this is true'
  DB<2> x require 'con'
0  1
  DB<3> x require 'con'
0  1
  DB<4>