As part of an Evil Plan, I am putting a sub-ref into @INC that will
screw around with modules as they're loaded. Or at least, I'm trying
to. I can't seem to get this to work:
perl -MIO::Scalar -e '
unshift @INC, sub {
print q{wibble};
return IO::Scalar->new(\q{print q{wobble}})
};
eval "use foo"
'
which *should*, if I've RTFM correctly, print "wibblewobble". But the
wobble never appears. What am I doing wrong?
--
David Cantrell | Hero of the Information Age
Sobol's Law of Telecom Utilities:
Telcos are malicious; cablecos are simply clueless.
