Select Code to Download

socketpair(CHILD, PARENT, AF_UNIX, SOCK_STREAM, PF_UNSPEC)
                                or  die "socketpair: $!";

#!/usr/bin/perl -w
...
    }