sub get_message { my $self = shift; my($cmd, @args); ...