Revision 0d6c1280
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
locale/de/locales.pl | ||
---|---|---|
59 | 59 |
parse_args(); |
60 | 60 |
|
61 | 61 |
opendir DIR, "$bindir" or die "$!"; |
62 |
my @progfiles = grep { /\.pl$/ && !/(_|^\.)/ } readdir DIR; |
|
62 |
my @progfiles = grep { /\.pl$/ && !/(_custom|^\.)/ } readdir DIR;
|
|
63 | 63 |
seekdir DIR, 0; |
64 |
my @customfiles = grep /_/, readdir DIR; |
|
64 |
my @customfiles = grep /_custom/, readdir DIR;
|
|
65 | 65 |
closedir DIR; |
66 | 66 |
|
67 | 67 |
# put customized files into @customfiles |
Auch abrufbar als: Unified diff
locales auch in Dateien mit Unterstrichen im Namen suchen