SIG{PIPE} = sub { print "Lost Connection.\n"; };