! m/^#/ and push @new, $_ for @array;