```{index} single: comppadlist (B) ``` ```{index} single: B::comppadlist ``` # comppadlist Return the padlist of the currently-compiling unit as a `B::PADLIST`. ## Synopsis ```perl my $pad = B::comppadlist; my ($names, $vals) = $pad->ARRAY; ``` At run time this is `PL_main_cv`'s padlist - the file-scope lexicals of the main program. Inside a `CHECK`/`INIT` block during compilation it is `PL_compcv`'s. `B::Xref` starts every cross-reference here.