Select Code to Download

use strict;
use warnings;
...
        print "Failure for $test\n";
    }
}

Matched > < for nomatch xxxxxx something somethingelse nomatch 
Matched > xxxxxx < for nomatch xxxxxx something xxxxxx somethingelse n
+omatch 
Failure for nomatch xxxxxx something xxxxxx nomatch xxxxxx somethingel
+se nomatch