--- Global.pm ---
$GLOBAL = 'Bad bad global';
sub dumbproc {
        $GLOBAL = 'Still sucks';
}