Send a message to Exo Celestial by Perl