Hi, I wouldn't know much about efficiency, you'll have to test both. But I would use grep rather than map for this:

my @b = grep { s/x//g;  $_ ne ''; } @a;
[download]

hth