http://7fh6tueqddpjyxjmgtdiueylzoqt6pt7hec3pukyptlmohoowvhde4yd.onion/public-inbox.git/tree/lib/PublicInbox/EmlContentFoo.pm
length $_ or /^;/ ; if ( $STRICT_PARAMS ) { #my $char = substr $_, 0, 1; #carp "Extra '$char' found after parameter"; return ; } if ( $erased ) { # Sometimes semicolon is missing, so check for = char last if m/^$re_token_non_strict=/ ; $value .= ' ' ; } $value .= substr $_ , 0 , 1 , '' ; } $value ; } 1 ; __END__ = func parse_content_type
This routine is exported by default .