>perl -wMstrict -le
"my $s = '<t>Abcd efgh ijK<t>';
 ;;
 print qq{1a '$&' ($1)} if $s =~ m{ > ( (?:\s|\w)+ ) (?!<X>) }xms;
 print qq{1b '$&' ($1)} if $s =~ m{ > (   [\s \w]+ ) (?!<X>) }xms;
 ;;
 print qq{2a '$&' ($1)} if $s =~ m{ > ( (?:\s|\w)+ ) (?!<t>) }xms;
 print qq{2b '$&' ($1)} if $s =~ m{ > (   [\s \w]+ ) (?!<t>) }xms;
 ;;
 print qq{3a '$&' ($1)} if $s =~ m{ > (?: ( \s|\w )+ ) (?!<t>) }xms;
 print qq{3b '$&' ($1)} if $s =~ m{ > (?: ([\s \w])+ ) (?!<t>) }xms;
"
1a '>Abcd efgh ijK' (Abcd efgh ijK)
1b '>Abcd efgh ijK' (Abcd efgh ijK)
2a '>Abcd efgh ij' (Abcd efgh ij)
2b '>Abcd efgh ij' (Abcd efgh ij)
3a '>Abcd efgh ij' (j)
3b '>Abcd efgh ij' (j)