[Perl/perl5] a1097f: re/pat.t: Compute scalar just once

[Karl Williamson via perl5-changes]

  Branch: refs/heads/blead
  Home:   https://github.com/Perl/perl5
  Commit: a1097f79e9ff25c5cd9dd3212a78913b49ce03b3
      
https://github.com/Perl/perl5/commit/a1097f79e9ff25c5cd9dd3212a78913b49ce03b3
  Author: Karl Williamson <k...@cpan.org>
  Date:   2023-08-09 (Wed, 09 Aug 2023)

  Changed paths:
    M t/re/pat.t

  Log Message:
  -----------
  re/pat.t: Compute scalar just once

This scalar was being computed twice.