If those are real tabs, then split on \t

# split tab
$var1="asd  zxc ggg";
@arr1=split(/\t/, $var1);
print "@arr1\n";
[download]

works for me, where those 'spaces' in $var1 are actually tabs.

Cheers
Chris