この形式の不要な文字を解析するために使用する必要がある正規表現パターンは何ですか？

#!/usr/bin/perl
POSIX qw(strftime);
my $time =  strftime("%YT%mT%d TTTT%H:%M", localtime);
print ("Todays date and time is $time\n");

私はregexに少し錆びています。これは次の出力を検索して置き換えるためのパターンになります。 2014T03T21 TTTT15：37？日付を表示したいだけです。あなたが正規表現以外の方法を知っているならば、それはまたすばらしいでしょう。

この正規表現を使用して、指定したパターンと括弧内のキャプチャグループを一致させて、必要な3つのコンポーネントを選択できます。 (\d{4})T(\d{2})T(\d{2}) TTTT\d{2}:\d{2}

これは年、月、日を記録します。照合するときは、次の構文を使用してこれらを3つの変数に割り当てることができます。

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

正規表現パターンを拡張し説明するオンラインツールはたくさんあります。