diff --git a/src/core/IO/Socket/INET.pm b/src/core/IO/Socket/INET.pm index 62d21097784..1c19467e456 100644 --- a/src/core/IO/Socket/INET.pm +++ b/src/core/IO/Socket/INET.pm @@ -45,7 +45,7 @@ my class IO::Socket::INET does IO::Socket { ?? v6-split(%args) !! v4-split(%args); if $port { - %args //= $port; + %args //= $port.Int; %args = $host; } } @@ -54,7 +54,7 @@ my class IO::Socket::INET does IO::Socket { ?? v6-split(%args) !! v4-split(%args); if $port { - %args //= $port; + %args //= $port.Int; %args = $peer; } }