@c_speed[0 .. $#c_speed] = split ' ', <$rstring>;