/
githubmirror
/
postgres
Обзор
Документация
Войти
/
githubmirror
/
postgres
Код
Запросы
0
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
src/test/locale/sort-test.pl
16 строк
280 B
Bruce Momjian
Update copyright for 2026
01 янв 2026, 21:24
01 янв 2026, 21:24
451c439
Код
Авторство
О чём код?
#! /usr/bin/perl # Copyright (c) 2021-2026, PostgreSQL Global Development Group use strict; use warnings FATAL => 'all'; use locale; open(my $in_fh, '<', $ARGV[0]) || die; chop(my (@words) = <$in_fh>); close($in_fh); $" = "\n"; my (@result) = sort @words; print "@result\n";