☰

Какой шаблон регулярного выражения мне придется использовать для анализа нежелательных символов в этом формате?

tag-icon • tag-icon regex perl
Какой шаблон регулярного выражения мне придется использовать для анализа нежелательных символов в этом формате? 
#!/usr/bin/perl
POSIX qw(strftime);
my $time =  strftime("%YT%mT%d TTTT%H:%M", localtime);
print ("Todays date and time is $time\n");

Я немного подзабыл о регулярных выражениях, какой шаблон будет для поиска и замены следующего вывода. 2014T03T21 TTTT15:37? Я просто хочу, чтобы отображалась дата. Если вы знаете другой метод, кроме регулярных выражений, это тоже было бы здорово.

решение1

Вы можете использовать это регулярное выражение для сопоставления с заданным вами шаблоном и группы захвата в скобках, чтобы выбрать три нужных вам компонента: (\d{4})T(\d{2})T(\d{2}) TTTT\d{2}:\d{2}

Это захватит год, месяц и дату. При сопоставлении вы можете назначить их трем переменным, используя следующий синтаксис:

$time =~ m/(\d{4})T(\d{2})T(\d{2}) TTTT\d{2}:\d{2}/;
my ($year, $month, $day) = ($1, $2, $3);

Существует множество онлайн-инструментов, которые расширяют и объясняют шаблоны регулярных выражений.

Связанный контент