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

ILYAZ / DProf-19981010 / t / test5.v 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14

              
# perl
use V;
dprofpp( '-T' );
$expected =
qq{main::foo1
   main::bar
      main::yeppers
main::foo2
   main::bar
      main::yeppers
};
report 1, sub { $expected eq $results };