Select Code to Download

package Communications;

...
sub ReceiveMessage {
    print "Communications::ReceiveMessage('$_[0]')\n";
}

Use of uninitialized value in concatenation (.) or string at D:\device
+\modem\internet\Xitami\cgi-bin\index.pl line 48.
Communications::ReceiveMessage('')
Communications::ReceiveMessage('Hello, World!')