require returns the last evaluated expression in the file

Only the first time:

> 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>
[download]

I've seen people do wacky things like have "return %hash" as the last expression and do "%hash = require Foo::Bar";

So such code will break as soon as more than one use of the module is attempted from a single run. That's a bit of a shame too, since Perl could really use something along those lines.

Since my post, I have used eval { require ... } ? ...->import : *symbol = sub { dummy here } a lot.

Juerd # { site => 'juerd.nl', plp_site => 'plp.juerd.nl', do_not_use => 'spamtrap' }