my @code = (
	sub { print "This does something!\n" },
	sub { print "This also does something!\n" },
);

for (@code) {
	$_->();
}