Lines Matching refs:part

41     my ($section, $part)=@_;
53         if((1 ==$inside) && ( ($_ =~ /^ *\<$part([^>]*)/) ||
54                               !(defined($part)) )
70         elsif((2 ==$inside) && ($_ =~ /^ *\<\/$part/)) {
78     my ($section, $part)=@_;
91         elsif(($inside >= 1) && ($_ =~ /^ *\<$part[ \>]/)) {
95             elsif($_ =~ /$part [^>]*base64=/) {
101         elsif(($inside >= 2) && ($_ =~ /^ *\<\/$part[ \>]/)) {
109                 print STDERR "*** getpart.pm: $section/$part returned data!\n";
112                 print STDERR "*** getpart.pm: $section/$part returned empty!\n";
130         print STDERR "*** getpart.pm: $section/$part returned data!\n";
135         print STDERR "*** getpart.pm: $section/$part returned empty!\n";
141     my ($section, $part)=@_;
149         elsif((1 == $inside) && ($_ =~ /^ *\<$part[ \>]/)) {