在perl中选择搜索查询之前的文本

Question

我正在搜索变量中的搜索词，并希望在变量中找到perl中的搜索词，并在找到它之前选择数据。即搜索下面的数据：“寻找新的约会游戏的Beta测试者”，并能够选择日期并将其放入变量

Sep 19 Hyper.IS IOS 8更新基于兴趣的社交网络（Beta测试者）（纽约市）图片地图9月19日寻找新的约会游戏的Beta测试人员。 （在线）图片地图

Answer 1

我是通过使用以下正则表达式来完成的：

my ($year, $month, $day, $hour, $min, $sec) = $get_time =~ /(\d\d\d\d)-(\d?\d)-(\d\d)T(\d\d):(\d\d):(\d\d)/;