my @index2 = grep {$_ ne "fourthy"} @coins);