Help for this page

Select Code to Download

Select or download this

foreach my $x (@names) {
 if ( $x =~ /test$/) {
  print "$path_name\n";
 }
}