Lines Matching refs:filename
282 my $filename = shift;
298 my $dirname = dirname($filename);
300 my $simplename = basename($filename, ".pod");
506 my $filename = shift;
534 my $filename = shift;
558 my $option_uw = normalise_option($id, $filename, $found);
576 my $option_uw = normalise_option($id, $filename, $found);
602 my $filename = shift;
700 my $filename = $podinfo{filename};
701 my $dirname = basename(dirname($filename));
706 $mansect = $1 if $filename =~ /man([1-9])/;
708 my $id = "${filename}:1:";
749 name_synopsis($id, $filename, $contents);
750 functionname_check($id, $filename, $contents);
752 option_check($id, $filename, $contents)
804 if podchecker($filename, $OUT) != 0;
969 my $filename = $podinfo{filename};
970 $filename =~ m|man(\d)/|;
972 my $simplename = basename($filename, ".pod");
973 my $id = "${filename}:1:";
986 $name_map{$name_sec} = $filename;
988 ( $filename =~ /\/internal\// ? 'internal' : 'public' )
990 } elsif ( $filename eq $name_map{$name_sec} ) {
1027 $link_map{$filename} = [ @links ];
1032 foreach my $filename ( sort keys %link_map ) {
1033 foreach my $link ( @{$link_map{$filename}} ) {
1034 err("${filename}:1:", "reference to non-existing $link")
1036 err("${filename}:1:", "reference of internal $link in public documentation $filename")
1039 && $filename !~ /\/internal\// );
