http://www.perlmonks.org?node_id=151680


in reply to Help with socket reading and returning

You do not initialise $message before the first time you call:

$message = ($message . $check_value);

Correct this by using:

my $message = '';

This page is intentionally left justified.