Hi greatshots,

This may be useful for you

while (my $line = <DATA>){
    my $i=0;
    chomp($line);
    my @array = split(',',$line);
    while($i<=$#array){
        print "$array[$i+2]\n";
        $i++;
    }
}
[download]

Punitha