Something like this?
($reg_exp = $user_query) =~ s/(\W)/$1 eq '*' ? "\\S*" : "\\$1"/ge;
It can be used as follows:
# File as an array of lines: @matching_lines = grep { /$reg_exp/ } @lines_to_search;
or
# File in a scalar: @matching_lines = $file =~ /^(.*${reg_exp}.*)$/mg;
In reply to Re: RegEx for users who dont know RegEx
by ikegami
in thread RegEx for users who dont know RegEx
by dimar
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |