--- iselect.pl 2007/10/25 14:52:56 8 +++ iselect.pl 2007/10/25 14:55:00 9 @@ -56,7 +56,7 @@ my $selectable_line; for my $l (0 .. $#lines) { - if ($lines[$l] !~ s/^{s}//) { + if ($lines[$l] =~ s/^{s}//) { $selectable_line->{$l}++; } }