Perldoc.pm revision 1
1N/A my @classes_to_add;
1N/Asub opt_n_with {
1N/Asub usage_brief {
1N/AUsage: $me [-h] [-V] [-r] [-i] [-v] [-t] [-u] [-m] [-n nroffer_program] [-l] [-T] [-d output_filename] [-o output_format] [-M FormatterModuleNameToUse] [-w formatter_option:option_value] [-F] [-X] PageName|ModuleName|ProgramName
1N/A my $good_class_found;
1N/A foreach my $c (@class_list) {
1N/A if($class_loaded{$c}) {
1N/A $good_class_found = $c;
1N/A if($class_seen{$c}) {
1N/A $good_class_found = $c;
1N/A unless $good_class_found;
1N/Asub render_and_page {
1N/Asub options_reading {
1N/Asub options_processing {
1N/Asub options_sanity {
1N/Asub grand_search_init {
1N/A my @dynamic_pod;
1N/A } elsif ( @dynamic_pod ) {
1N/A @$found_things = ();
1N/Asub search_perlfunc {
1N/Asub search_perlfaqs {
1N/Asub render_findings {
1N/A ? $formatter_class->new
1N/A if(! @$found_things) {
1N/Asub unlink_if_temp_file {
1N/Asub MSWin_temp_cleanup {
1N/Asub after_rendering {
1N/Asub after_rendering_VMS { return }
1N/Asub after_rendering_Dos { return }
1N/Asub after_rendering_OS2 { return }
1N/Asub pagers_guessing {
1N/A if (IS_MSWin32) {
1N/Asub page_module_file {
1N/Asub check_file {
1N/Asub containspod {
1N/Asub maybe_diddle_INC {
1N/A if (-f "Makefile.PL") {
1N/Asub new_output_file {
1N/Asub useful_filename_bit {
1N/A if( IS_MSWin32 ) {
1N/A if ($output_to_stdout) {
1N/A my $already_asserted;
1N/A sub assert_closing_stdout {
1N/A return if $already_asserted;
1N/A if (IS_MSWin32) {
1N/Asub am_taint_checking {
1N/A return is_tainted($v);
1N/Asub drop_privs_maybe {
1N/A# -added recursive/case-insensitive matching (thanks, Andreas). This