怎么从 2007-10-31 18:19:55 以这个格式取出 20071031

zhaimeng

UID: 3479
帖子: 151
积分: 347
在线时间: 1 天 7 小时

1^# zhaimeng 发表于 2007-10-29 12:10

怎么从 2007-10-31 18:19:55 以这个格式取出 20071031

从 2007-10-31 18:19:55 以这个格式取出 20071031

2007-10-31 18:19:55 是个变量

已解决

my $date_time="2007-10-31 18:19:55";
my $date;
my $year=substr($date_time,0,4);
my $month=substr($date_time,5,2);
my $day=substr($date_time,8,2);
$date=$year.$month.$day;

ubac

UID: 8216
帖子: 71
积分: 163
在线时间: 7 小时

2^# ubac 发表于 2007-10-29 13:01

$date =~ s/(\d{4})-(\d{2})-(\d{2})\s*(\d{2}):(\d{2}):(\d{2})/$1$2$3/;

limohua

UID: 29105
帖子: 74
积分: 170
在线时间: 7 小时

3^# limohua 发表于 2007-10-30 09:14

my @m = split /[\-\s:]+/, $_[0];