Add a macro that creates a socket in PG.pl