[jps@secanaws jps]$ perl ipc-write.pl
Can't call method "pack" on an undefined value at /usr/lib/perl5/5.6.1/i386-linux/IPC/Msg.pm line 78.