Как мне установить `SO_RCVTIMEO` для сокета в Perl?

Если я попытаюсь так: my $sock = IO::Socket::INET->new( … ) or die "no socket for you"; defined $sock->setsockopt(SOL_SOCKET, SO_RCVTIMEO, 30) or die "setsockopt: $!";тогда мой скрипт подвергается смерти от "setsockopt: Неверный аргумент в ...