Perl Regulärer Ausdruck im exakt drei Großbuchstaben zu finden

[islandius]

suche doch nach allem gleichzeitig, zB:

$text =~ /.+>(\w+?)\s+?(([A-Z]{3})).+/g;
my($bahnhof, $initialen) = ($1, $2);

  
Hatte an diese Alternative noch gar nicht gedacht... Werd's mal versuchen. Vielen lieben Dank.  
  
islandius