Select Code to Download

my @not_coin = grep { $_ ne 'coin' } @array;

my @not_coin = map { $_ eq 'coin' ? undef : $_ } @array;