# [Perl 5] `-lF `, 288 bytes


<!-- language-all: lang-perl -->

    $,=$";$_=' .||.||. ';map{y/./ /}(@a=((y/./ /r.y/.| /-+-/r x2)x2 .'    \\  /  ^ 'x2)=~/.../g)[0..8];@c=((y/.| /-+-/r x2 .y/./ /r)x2 .' V  /  \\    'x2)=~/.../g;@b=(y/./ /r x3 .$_ x3 .'\\ /  ><  / \\\\./ .><. /.\\')=~/.../g;chomp@F;for$r(a..c){say map{/[a-z]/i?$$r[-65+ord uc]:$"x3}@F}say''

[Try it online!][TIO-jwx35wlj]

[Perl 5]: https://www.perl.org/
[TIO-jwx35wlj]: https://tio.run/##VY/dToNAEEbv9ykmzSZLU5mlEIyRUrmRK701JgUbCv1BoYtLa6GlPrq4tDXqZJLJTr5zJlvMZWa3Lb1yac@hU5cBNk3XwJw8Kg41Rw78qHmRq2nnh0Q1G@D6QOcSKrNfmYAMVAUBAAd4Aaa27idHRL7sTwzEm9Dx4rPhDwl4MV4UTye8s8A/hePN3J/jUFmAdHoaTEUVMB51XKBKJXA8QuAYBOwXj1ciLzzfWQhJpRYhxv1DGdXQfZBPIn0f8vSOUjnRr@2BkAls4/CW9irr6PlHFWSsbVf3D5mY7oTMkqFpPZNoFpNkviDLVUpe3zKSrwUp3iUpN9sPsqvq/ZcoNqlYl63@aKMxNFo9878B "Perl 5 – Try It Online"

There's probably still a bit here that could be golfed further.