Select Code to Download

use B 'main_root';
use B::Deparse;

my $deparse = B::Deparse->new();
print $deparse->( main_root, 0 );