# add this to L.pm
use Filter::Simple;
FILTER {
	while (/((?:[\w]+::)+)[\w]+\(/g) {
		substr(my $module = $1, -2) = '';
		eval { Module::Load::load($module) }; 
	}
};