История изменений
Исправление Zmicier, (текущая версия) :
Если я правильно понял, вы спрашиваете, как разделить строку не по тем запятым, которые знаки пунктуации в человеческом языке, и за которым соответственно должен идти тот или иной пробел; а по другим. Тогда как-то так:
$ perl -ne 'print join "\n", split /,(?!\s)/' << EOF
> Images_MY_fucking images/498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.jpg,498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.tif
> EOF
Images_MY_fucking images/498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.jpg
498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.tif
Исходная версия Zmicier, :
Если я правильно понял, вы спрашиваете, как разделить строку по запятой, которая не знак пунктуации, за которым должен идти тот или иной пробел. Тогда как-то так:
$ perl -ne 'print join "\n", split /,(?!\s)/' << EOF
> Images_MY_fucking images/498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.jpg,498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.tif
> EOF
Images_MY_fucking images/498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.jpg
498579485ddsjfb Mushroom-Head, 1 3 8 inch dia., Illuminated.tif