package MyCommonUses;
use strict;
use warnings;
my $header  = '/path/to/header.pl';
my $content = do {local $/; open my $fh,'<',$header or die; <$fh> }
    or die "couldn't load common use statements, aborted";

sub import {
    my $caller = caller;
    eval "package $caller; $content;";
    strict->import;
    warnings->import;
}
1;