push( @pieces, $_ ) foreach split( /\./, $file );