Help for this page
foreach (@users) { if (/$target/) { ... if ($rec =~ /\D/) { next if $rec =~ /dtr/; ... etc