Send a message to Piano with Perl