Select Code to Download

#!/usr/bin/perl -w

...

print STDERR "[Connected to $host:$port]\n";
while ( <$remote> ) { print }

#include <stdio.h>
#include <stdlib.h>
...
    close(sockfd);
    return 0;
}