my $tmp = io; io( '.' )->next > $tmp;