use Text::CVS;
my $csv = Text::CSV->new ();

#...

# CSV vom Server geholt..
if ($res->is_success)
{
  # die Zeilen aufsplitten
  for my $line (split(/[\x0D\x0A]+/,$res->content)
  {
    # Zeile parsen
    if($cvs->parse($line))
    {
      # gefundene Elemente auslesen
      my @data=$cvs->fields();

      # mach was mit den Daten...
      # ...
    }
  }
}