# this should work
my @messages = selectMsgFromDb();

# or, if you want to use references
my $messages = selectMsgFromDb();

# and amend last line of selectMsgFromDb sub to:
    return \@msgs;