! /^\s*$/


##</code><code>##

/\S/


##</code><code>##

if ( /^(\w+)\s+([\d.]+)/ ) {

   ($names[$l],$versions[$l])=($1,$2);
   ++$l;

else { . . .