On Thu, Jan 24, 2002 at 11:24:47AM -0500, Bill -OSX- Jones wrote:
> Sorry -
> 
> Given:
> 
> $_ = "Mac OS X";
> 
> split //;
> $c = grep {/[osx]/i} @_;
> 
> print "Found $c things\n";

One alternative is:

  $_ = "Mac OS X";
  $c = tr/osxOSX//;
  print "Found $c things\n";


 .robin.

Reply via email to