Есть ли модуль для генерации шаблонов глобусов из строк формата даты в Perl?

Question

Я хочу генерировать шаблоны глобусов из строк формата даты, например,

%Y-%m-%d

должно стать

[0-9][0-9][0-9][0-9]-[0-9][0-9]-[0-9][0-9]

, а

%C (e.g., Sat Nov 19 21:05:57 1994)

должно стать

[A-Z][a-z][a-z] [A-Z][a-z][a-z] [0-9][0-9] [0-9][0-9]:[0-9][0-9]:[0-9][0-9] [0-9][0-9][0-9][0-9]

Мне интересно, если что-то подобное уже существует.

Answer 1

Это не прямой ответ на ваш вопрос, но полезно для достижения желаемого.

использовать модуль из CPAN: Date :: Parse. Он анализирует различные форматы даты на разных языках.

Из документов:

$lang = Date::Language->new('German');<br> $lang->str2time("25 Jun 1996 21:09:55 +0100");

Документ содержит несколько различных форматов даты, которые вы можете использовать.