#!/usr/local/bin/perl -w

while (<DATA>) {
»· for (m{<M>([^<]+)(?=</M\d+>)}ig) { print $_,"\n"};
}

__DATA__
America's first <M>swept-wing</M>, <M>multiengine jet</M> <M>bomber</M>
was the <M>B-47 Stratojet</M200>, and the first <M>swept-wing
fighter</M> was the <M>F-86 Sabre Jet</M201>. Both used new swept-wing
data found in Germany after <M>World War II</M> and sent back to the
United States by American scientists. This photograph, from <D>1951</D>,
was taken the first time the two flew together over <PL>Kansas</PL>.·

<M>Bogus</M2> <M>airplane</M3>