sub lowercase {
    my @out = map { lc } @_ ;
    return @out ;
    }

$name = lowercase( 'Jim', "Jeff" ) ;
## $name == 2