while (<DATA>) {
$file{$num} = [(split)[2..4]];


この場合、splitは何を表しているのでしょうか？