Hamilton LaboratoriesHamilton C shell 2012User guideSamples

memberi.csh

Oregon Coast

memberi.csh
Previous | Next

#  Determine by case-insensitive comparison if the first argument word
#  appears somewhere in the list given by the second argument.

#  Copyright (c) 1994-2012 by Hamilton Laboratories.  All rights reserved.
      
proc memberi ( a, b )
   local i
   @ a = lower( a )
   foreach i ( $b )
      if ( a == lower( i ) ) return 1
   end
   return 0
end

memberi $argv

Previous | Next