use vars qw/$foot $head/;
require Defaults;

##</code><code>##

package Defaults;

$::head = 'foo';
$::foot = 'bar';