open(FILE, "data.txt");          #opens data.txt in read-mode
while(<FILE>){                   #reads line by line from FILE which is the filehandle for data.txt
   chomp;
   push(@data,split(/,/,$_));
}

close FILE;                      #close the file.

 print "$_\n" foreach (@data);