perlの正規表現

data = '2014-11-18 19:00:45';

($nen,$tuki,$hi) = split(/[\-\/\s:]/,$data);

    ↓

$nen 2014

$tuki 11

$hi 18