Re: index using a range

[choroba]

A bit cryptic, but without the need of $1:

my $str   = '000001';
my $index = length(($str =~ /^(0*)/)[0]);