while (<FILE_HANDLE>){
  @items = split /,/;
  # do something with @items
}