Select Code to Download

split(/"|'/,<your funny string goes here)

#! /usr/local/bin/perl 

...
print("Resultant array: " , join('  ', @arr), "\n");

exit(0)

Resultant array: jfjsa as,.n d  fdsafjl  jop  fdsjklf fds  457  fjdskl
+aoir  jkl45;fs ier987543   fsdjkal