open(MAIL,"|mailx blah) || die "No mail stuff: $! \n"; SWITCH: { $ct >= 2 && { print MAIL "\n$ct are not available at this time.\n"; last SWITCH }; $ct == 1 && { print MAIL "\n$ct is down at this time.\n"; last SWITCH }; } close(MAIL);