use Class::MOP; print "hello\n"; #### use B::Hooks::EndOfScope; print "hello\n"; #### use Pod::Usage qw(pod2usage); #### pp example.pl ./a.out