#!/usr/bin/perl use strict; use warnings; my $csv = "one, two, three, four, five, six"; my @list = split ', ' , $csv; print "@list";