my ($logmessage, $priority) = @_;       # common
my $logmessage = $_[0];                 # uncommon, and ugly