Generating C code from perl script which use Socket

[noone]

Hello,

I am trying to translate in C the simple following perl script:

use Socket;

my $proto = getprotobyname('tcp');
socket(SERVER, PF_INET, SOCK_STREAM, $proto) or die "socket: $!";

For that, I use the command:

perl -MO=C test.pl > test.c

But I obtain the following (error) messages: