perl -lpe'BEGIN{$r=pop} $_=/$r/?"Yes":"No"' your_regex_here #### perl -lpe"BEGIN{$r=pop} $_=/$r/?'Yes':'No'" your_regex_here