This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
d504cd55365e99af1495c64f5c741a3c1dbe4e5f
[perl5.git]
/
t
/
lib
/
dprof
/
test1_t
1
sub foo {
2
print "in sub foo\n";
3
bar();
4
}
5
6
sub bar {
7
print "in sub bar\n";
8
}
9
10
sub baz {
11
print "in sub baz\n";
12
bar();
13
foo();
14
}
15
16
bar();
17
baz();
18
foo();