unless($list eq " ")
             {
                  push(@array, $list);
             }