#!/usr/local/bin/perl my @items = split /\",\"/, '"alpha","beta","gamma"'; foreach (@items) { print "$_\n"; } #### "alpha beta gamma"