6: my $html;
7:
8: sub foo {
9: my $t = Devel::StackTrace::WithLexicals->new;
10: $html = $t->as_html_extended;
11: print $html;
12: }
Argument | Value |
---|---|
$_[0] |
|
$_[1] |
|
$_[2] |
|
Variable | Value |
---|---|
$html |
|
11: print $html;
12: }
13:
14: sub bar { foo("bar", "test", { asdf => 'asdf', nums => [2,2,2,1, 40..120]}) }
15: bar(2);
16:
17:
Argument | Value |
---|---|
$_[0] |
|
Variable | Value |
---|---|
$html |
|
12: }
13:
14: sub bar { foo("bar", "test", { asdf => 'asdf', nums => [2,2,2,1, 40..120]}) }
15: bar(2);
16:
17:
18:
Variable | Value |
---|---|
$html |
|