# first of all, use the strictures: 
use strict;
use warnings;

# second of all, pare the question down to its bare essense,
# and leave al other extraneous stuff out.
my @jobs = ( sub {print "a\n"},
		  sub {print "b\n"}
		);

print "one way to call anonymous subs, deferencing with the arrow:\n";
for my $job (@jobs) {
	$job->();
}
# hope this helps!

print "another way, deferencing with the & sigil:\n";
for my $job (@jobs) {
	&$job();
}

print "same thing, deferencing with explicit braces:\n";
for my $job (@jobs) {
	&{$job}();
}