my($first, $last) = $name =~ /(.+)&(.+)/; #### if ($2 eq '0') {