http://qs321.pair.com?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);
}

[download]

-Blake

Replies are listed 'Best First'.
Re: Re: Re: Re: strings with options - how do I do this?
by Anonymous Monk on Feb 27, 2003 at 13:32 UTC
    thank you people ... that does it perfectly. I learnt my "something new" for today too.
[reply]

In Section Seekers of Perl Wisdom