From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

SHAY / perl-5.40.1 / lib / perl5db / t / break-on-dot 

            

              
1
2
3
4
5
6
7
8
9
10

              
#!/usr/bin/perl
use strict;
use warnings;
my $exp = 1;
for my $i (1 .. 20)
{
    $exp *= 2;
}