perl -MData::Dumper -e 'print Dumper grep length $_, split /[^\d\.]+/, "(  0,  670); 3.2; 7.8; 9.4; 10.2; 12.6;"'

##</code><code>##

$VAR1 = '0';
$VAR2 = '670';
$VAR3 = '3.2';
$VAR4 = '7.8';
$VAR5 = '9.4';
$VAR6 = '10.2';
$VAR7 = '12.6';