Well,
first I want to learn how this works to write my own stuff
second this is not my code, it is from an official Perl-Site where examples of how to program socket stuff are written. I don't understand that those 'official examples' do not work.
Carl