@b = grep { defined $_ }  @{[@a]}[0..5];