24 ms·
Fwiw, adapted from "Parsing an ipv4 address"[1]: / ( (\d ** 1..3) <?{ 0 < $0 < 255 }> ) ** 4 % '.' /; [1]: https://perl6advent.wordpress.c
by raiph 10y ago
Fwiw, adapted from "Parsing an ipv4 address"[1]:
/ ( (\d ** 1..3) <?{ 0 < $0 < 255 }> )
** 4
% '.'
/;
[1]:
https://perl6advent.wordpress.com/2012/12/22/day-22-parsing-an-ipv4-address/ https://perl6advent.wordpress.com/2012/12/22/day-22-parsing-...