package Htmlz;

sub ah{ 
 print 'an experiment' 
}

package Effect;

print 'im conducting ', Htmlz::ah;
-------
an experimentim  conducting1