Help for this page
use strict; use warnings; ... while (++$x) { # Runs forever print uc substr $x->as_hex, 2; }