"Castelo de Paiva" $r $t => sub { print "<b>$r</b> $t<br>"; }.
