When I used to use Windows regularly and I saw that you could write stuff with less code I never looked back...(this is just a style comment btw)

#!/usr/bin/perl -w
use strict;

my @data = qw~DataB absx FALSE TRUE ABCx xzx 123x .99999x TRUE 10x~;

for(0..$#data){
    my $n= $_+1;
    print qq~\$CurrentSheet->Range("A$n")->{"Value"} = "$data[$_]"\n~;
}

1;
[download]