%data = map {/(\w+)\s*(\w+)/} @info;

##</code><code>##

%data = map {split ' ', $_, 2} @info;