for my $ref ( @dispatch ) {

	my $argument = "Bla";                    # etwas zum Weiterreichen an die Sub

	eval <<"EVAL_CODE";
package $ref->{unit};
require "$ref->{file}";
$ref->{subroutine}(\$argument);                  # $argument ist maskiert, weil es nicht im String interpoliert, sondern erst beim eval() ausgewertet werden soll
EVAL_CODE
	warn "ACHTUNG: $@\n"	if $@;
}