if /(\w{3}\s+\w{3}\s+\d+)/){ $foo = $&; }