Win8 Strawberry 5.8.9.5 (32)  Wed 04/07/2021 21:58:47
C:\@Work\Perl\monks
>perl -Mstrict -Mwarnings -l

my $value = 1 x (131 / 1);
print 'C: ', $value;

^Z
C: 1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
1111111111111111111111111111111111