while (@files){
 chomp; 
 push @filesA, $_;
}