for (@files) { 
   /\.txt/ && do { print; };
}