if ($line =~ /^0.{9}        
(\t[0-9]{1,20}) etc. etc. etc.
##</code><code>##

my @excelData = split /\t/, $slurpedExcelFile;

##</code><code>##

my @excelData = split "\t", $slurpedExcelFile;

##</code><code>##

my @numbers = grep /# your regex/, @excelData;