my $len_in_bin = pack "N", length $oktets;