I'm confused, Perl doesn't implement sscanf , that's apparently a C function to "inverse" printf ( for completeness compare String::Scanf )

Anyway I'm pretty sure you basically only need this to "elegantly" parse one line:

@c_speed = split / /, $rstring;

See split for more

There are more issues with your code, but better little by little.