http://www.perlmonks.org?node_id=239061


in reply to Re: Re: strings with options - how do I do this?
in thread strings with options - how do I do this?

Good points... How about this:
use File::Glob qw(:glob); sub parseit { my $text = shift; $text =~ tr/[|]/{,}/; $text =~ s/([\\?*])/\\$1/g; map {s/\\([\\?*])/$1/g; $_} bsd_glob($text, GLOB_BRACE | GLOB_NOCHECK); }

-Blake