use ProjectA; my $project = 'ProjectA'; my %ThingsToDo = (firstTask => sub { $project->prepare }); $ThingsToDo{firstTask}->();