This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In Socket.xs, convert 3 croak()s to use %s and a constant string for the name.