sub like_arg { my ($prewild, $string, $postwild) = @_; return "%" if $string eq ""; return "%" . $string . "%" if $prewild and $postwild; return "%" . $string if $prewild; return $string . "%" if $postwild; ""; }