Select Code to Download

if( $text =~ /$query/i ) {
    while ( $text =~ /$query/gi ) {
...
else {
    ## Is this possible?
}

while ( $text =~ /($query|$query_modified)/gi ) {
    if( $1 eq $query ) {
...
        do_something_else();
    }
}