Write array contents to csv file

learner@perl has asked for the wisdom of the Perl Monks concerning the following question:

Hi All,

I am pushing some values into array and then writing the values from array to csv file. i have used the below code

my $csvfile;
push (@report,(join "\t", $empid, @array),"\n")
foreach  (@report) {
print $_;
print $csvfile $_;
}
[download]

when i execute the code, i am getting below output on command prompt

JKSLK    19890101    20000101    France    ALMERIA    100000.00    BCF
+GHK
[download]

on csv file, i am getting below output

Name    DOB    DOJ    Country    Region    Salary    Place
JKSLK1989010120000101FranceALMERIA100000.00BCFGHK
[download]

How can i write the values on csv file in tab delimited formatm please suggestions

Thanks in advance