Revision f12a5993
Von Udo Spallek vor fast 18 Jahren hinzugefügt
bin/mozilla/admin.pl | ||
---|---|---|
1467 | 1467 |
} |
1468 | 1468 |
|
1469 | 1469 |
opendir SQLDIR, "sql/." or $form - error($!); |
1470 |
foreach $item (sort grep /-chart\.sql/, readdir SQLDIR) { |
|
1470 |
foreach $item (sort grep /-chart\.sql\z/, readdir SQLDIR) {
|
|
1471 | 1471 |
next if ($item eq 'Default-chart.sql'); |
1472 | 1472 |
$item =~ s/-chart\.sql//; |
1473 | 1473 |
push @charts, |
Auch abrufbar als: Unified diff
Suche einschraenken auf .sql am Ende (\x)