[AndMetal]

You should be able to do it like this, using your code:

sub EVENT_TIMER {
	my $zonelnuc = uc($zoneln);
	if ($timer eq "warning1") {
		quest::stoptimer("warning1");
		quest::shout("$zonelnuc will be restarting in 30 minutes.  Please zone out before that time.");
	}
	...
	...
	...
}

So, you could just need to rename the $zoneln in the rest of the script to $zonelnuc.