Lines Matching refs:opt_p
582 $opt_p,
621 'remove-prefix|p=s' => \$opt_p,
867 if (defined $opt_p) {
868 if (!/^$opt_p(\d)/) {
869 ++$prefix{$_} if s/^$opt_p//;
872 warn "can't remove $opt_p prefix from '$_'!\n";
1041 = sort map { ++$prefix{$_} if s/^$opt_p(?!\d)//; $_ } @fnames_no_prefix
1042 if defined $opt_p;
1287 # $exp_doc .= <<EOD if $opt_p;
1288 #When accessing these functions from Perl, prefix C<$opt_p> should be removed.
1462 my $prefix = defined $opt_p ? "PREFIX = $opt_p" : '';