.\" Automatically generated by Pod::Man 2.28 (Pod::Simple 3.28) .\" .\" Standard preamble: .\" ======================================================================== .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. \*(C+ will .\" give a nicer C++. Capital omega is used to do unbreakable dashes and .\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff, .\" nothing in troff, for use with C<>. .tr \(*W- .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' . ds C` . ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .ie \n(.g .ds Aq \(aq .el .ds Aq ' .\" .\" If the F register is turned on, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .\" .\" Avoid warning from groff about undefined register 'F'. .de IX .. .nr rF 0 .if \n(.g .if rF .nr rF 1 .if (\n(rF:(\n(.g==0)) \{ . if \nF \{ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . if !\nF==2 \{ . nr % 0 . nr F 2 . \} . \} .\} .rr rF .\" .\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2). .\" Fear. Run. Save yourself. No user-serviceable parts. . \" fudge factors for nroff and troff .if n \{\ . ds #H 0 . ds #V .8m . ds #F .3m . ds #[ \f1 . ds #] \fP .\} .if t \{\ . ds #H ((1u-(\\\\n(.fu%2u))*.13m) . ds #V .6m . ds #F 0 . ds #[ \& . ds #] \& .\} . \" simple accents for nroff and troff .if n \{\ . ds ' \& . ds ` \& . ds ^ \& . ds , \& . ds ~ ~ . ds / .\} .if t \{\ . ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u" . ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u' . ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u' . ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u' . ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u' . ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u' .\} . \" troff and (daisy-wheel) nroff accents .ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V' .ds 8 \h'\*(#H'\(*b\h'-\*(#H' .ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#] .ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H' .ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u' .ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#] .ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#] .ds ae a\h'-(\w'a'u*4/10)'e .ds Ae A\h'-(\w'A'u*4/10)'E . \" corrections for vroff .if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u' .if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u' . \" for low resolution devices (crt and lpr) .if \n(.H>23 .if \n(.V>19 \ \{\ . ds : e . ds 8 ss . ds o a . ds d- d\h'-1'\(ga . ds D- D\h'-1'\(hy . ds th \o'bp' . ds Th \o'LP' . ds ae ae . ds Ae AE .\} .rm #[ #] #H #V #F C .\" ======================================================================== .\" .IX Title "Mail::Message::Field::Attribute 3pm" .TH Mail::Message::Field::Attribute 3pm "2014-08-24" "perl v5.20.0" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l .nh .SH "NAME" Mail::Message::Field::Attribute \- one attribute of a full field .SH "INHERITANCE" .IX Header "INHERITANCE" .Vb 2 \& Mail::Message::Field::Attribute \& is a Mail::Reporter .Ve .SH "SYNOPSIS" .IX Header "SYNOPSIS" .Vb 3 \& my $field = $msg\->head\->get(\*(AqContent\-Disposition\*(Aq) or return; \& my $full = $field\->study; # full understanding in unicode \& my $filename = $full\->attribute(\*(Aqfilename\*(Aq) or return; \& \& print ref $filename; # this class name \& print $filename; # the attributes content in utf\-8 \& print $filename\->value; # same \& print $filename\->string; # print string as was found in the file \& $filename\->print(\e*OUT); # print as was found in the file .Ve .SH "DESCRIPTION" .IX Header "DESCRIPTION" Attributes within \s-1MIME\s0 fields can be quite complex, and therefore be slow and consumes a lot of memory. The Mail::Message::Field::Fast and Mail::Message::Field::Flex simplify them the attributes a lot, which may result in erroneous behavior in rare cases. With the increase of non-western languages on Internet, the need for the complex headers becomes more and more in demand. .PP A \f(CW\*(C`Mail::Message::Field::Attribute\*(C'\fR can be found in any structured Mail::Message::Field::Full header field. .PP Extends \*(L"\s-1DESCRIPTION\*(R"\s0 in Mail::Reporter. .SH "OVERLOADED" .IX Header "OVERLOADED" .IP "overload: \fBcomparison\fR" 4 .IX Item "overload: comparison" When the second argument is a field, then both attribute name (case-sensitive) and the decoded value must be the same. Otherwise, the value is compared. .IP "overload: \fBstringification\fR" 4 .IX Item "overload: stringification" Returns the decoded content of the attribute. .SH "METHODS" .IX Header "METHODS" Extends \*(L"\s-1METHODS\*(R"\s0 in Mail::Reporter. .SS "Constructors" .IX Subsection "Constructors" Extends \*(L"Constructors\*(R" in Mail::Reporter. .ie n .IP "Mail::Message::Field::Attribute\->\fBnew\fR( <$name, [$value] | \s-1STRING\s0>, %options )" 4 .el .IP "Mail::Message::Field::Attribute\->\fBnew\fR( <$name, [$value] | \s-1STRING\s0>, \f(CW%options\fR )" 4 .IX Item "Mail::Message::Field::Attribute->new( <$name, [$value] | STRING>, %options )" Create a new attribute \f(CW$name\fR with the optional \f(CW$value\fR. If no \f(CW$value\fR is specified, the first argument of this method is inspected for an equals sign \f(CW\*(Aq=\*(Aq\fR. If that character is present, the argument is taken as \s-1STRING,\s0 containing a preformatted attribute which is processed. Otherwise, the argument is taken as name without \f(CW$value:\fR set the value later with \fIvalue()\fR. .Sp Whether encoding takes place depends on the \f(CW%options\fR and the existence of non-ascii characters in the \f(CW$value\fR. The \f(CW$name\fR can only contain ascii characters, hence is never encoded. .Sp To speed things up, attributes are not derived from the Mail::Reporter base-class. .Sp .Vb 6 \& \-Option \-\-Defined in \-\-Default \& charset \*(Aqus\-ascii\*(Aq \& language undef \& log Mail::Reporter \*(AqWARNINGS\*(Aq \& trace Mail::Reporter \*(AqWARNINGS\*(Aq \& use_continuations .Ve .RS 4 .IP "charset => \s-1STRING\s0" 2 .IX Item "charset => STRING" The \f(CW$value\fR is translated from utf\-8 (Perl internal) to this character set, and the resulting string is encoded if required. \f(CW\*(C`us\-ascii\*(C'\fR is the normal encoding for e\-mail. Valid character sets can be found with Encode::encodings(':all'). .IP "language => \s-1STRING\s0" 2 .IX Item "language => STRING" \&\s-1RFC2231\s0 adds the possiblity to specify a language with the field. When no language is specified, none is included in the encoding. Valid language names are defined by \s-1RFC2130. \s0 This module has only limited support for this feature. .IP "log => \s-1LEVEL\s0" 2 .IX Item "log => LEVEL" .PD 0 .IP "trace => \s-1LEVEL\s0" 2 .IX Item "trace => LEVEL" .IP "use_continuations => \s-1BOOLEAN\s0" 2 .IX Item "use_continuations => BOOLEAN" .PD Continuations are used to break-up long parameters into pieces which are no longer than 76 characters. Encodings are specified in \s-1RFC2231,\s0 but not supported by some Mail User Agents. .RE .RS 4 .Sp example: .Sp .Vb 2 \& my $fn = Mail::Message::Field::Attribute \& \->new(filename => \*(Aqxyz\*(Aq); \& \& my $fattr = \*(AqMail::Message::Field::Attribute\*(Aq; # abbrev \& my $fn = $fattr\->new \& ( filename => "Re\exC7u" \& , charset => \*(Aqiso\-8859\-15\*(Aq \& , language => \*(Aqnl\-BE\*(Aq \& ); \& print $fn; \& # \-\-> filename*=iso\-8859\-15\*(Aqnl\-BE\*(AqRe%C7u .Ve .RE .SS "Error handling" .IX Subsection "Error handling" Extends \*(L"Error handling\*(R" in Mail::Reporter. .ie n .IP "$obj\->\fB\s-1AUTOLOAD\s0\fR()" 4 .el .IP "\f(CW$obj\fR\->\fB\s-1AUTOLOAD\s0\fR()" 4 .IX Item "$obj->AUTOLOAD()" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBaddReport\fR($object)" 4 .el .IP "\f(CW$obj\fR\->\fBaddReport\fR($object)" 4 .IX Item "$obj->addReport($object)" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBdefaultTrace\fR( [$level]|[$loglevel, $tracelevel]|[$level, $callback] )" 4 .el .IP "\f(CW$obj\fR\->\fBdefaultTrace\fR( [$level]|[$loglevel, \f(CW$tracelevel\fR]|[$level, \f(CW$callback\fR] )" 4 .IX Item "$obj->defaultTrace( [$level]|[$loglevel, $tracelevel]|[$level, $callback] )" .PD 0 .ie n .IP "Mail::Message::Field::Attribute\->\fBdefaultTrace\fR( [$level]|[$loglevel, $tracelevel]|[$level, $callback] )" 4 .el .IP "Mail::Message::Field::Attribute\->\fBdefaultTrace\fR( [$level]|[$loglevel, \f(CW$tracelevel\fR]|[$level, \f(CW$callback\fR] )" 4 .IX Item "Mail::Message::Field::Attribute->defaultTrace( [$level]|[$loglevel, $tracelevel]|[$level, $callback] )" .PD Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBerrors\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBerrors\fR()" 4 .IX Item "$obj->errors()" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBlog\fR( [$level, [$strings]] )" 4 .el .IP "\f(CW$obj\fR\->\fBlog\fR( [$level, [$strings]] )" 4 .IX Item "$obj->log( [$level, [$strings]] )" .PD 0 .IP "Mail::Message::Field::Attribute\->\fBlog\fR( [$level, [$strings]] )" 4 .IX Item "Mail::Message::Field::Attribute->log( [$level, [$strings]] )" .PD Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBlogPriority\fR($level)" 4 .el .IP "\f(CW$obj\fR\->\fBlogPriority\fR($level)" 4 .IX Item "$obj->logPriority($level)" .PD 0 .IP "Mail::Message::Field::Attribute\->\fBlogPriority\fR($level)" 4 .IX Item "Mail::Message::Field::Attribute->logPriority($level)" .PD Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBlogSettings\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBlogSettings\fR()" 4 .IX Item "$obj->logSettings()" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBnotImplemented\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBnotImplemented\fR()" 4 .IX Item "$obj->notImplemented()" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBreport\fR( [$level] )" 4 .el .IP "\f(CW$obj\fR\->\fBreport\fR( [$level] )" 4 .IX Item "$obj->report( [$level] )" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBreportAll\fR( [$level] )" 4 .el .IP "\f(CW$obj\fR\->\fBreportAll\fR( [$level] )" 4 .IX Item "$obj->reportAll( [$level] )" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBtrace\fR( [$level] )" 4 .el .IP "\f(CW$obj\fR\->\fBtrace\fR( [$level] )" 4 .IX Item "$obj->trace( [$level] )" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .ie n .IP "$obj\->\fBwarnings\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBwarnings\fR()" 4 .IX Item "$obj->warnings()" Inherited, see \*(L"Error handling\*(R" in Mail::Reporter .SS "Cleanup" .IX Subsection "Cleanup" Extends \*(L"Cleanup\*(R" in Mail::Reporter. .ie n .IP "$obj\->\fB\s-1DESTROY\s0\fR()" 4 .el .IP "\f(CW$obj\fR\->\fB\s-1DESTROY\s0\fR()" 4 .IX Item "$obj->DESTROY()" Inherited, see \*(L"Cleanup\*(R" in Mail::Reporter .SS "The attribute" .IX Subsection "The attribute" .ie n .IP "$obj\->\fBaddComponent\fR(\s-1STRING\s0)" 4 .el .IP "\f(CW$obj\fR\->\fBaddComponent\fR(\s-1STRING\s0)" 4 .IX Item "$obj->addComponent(STRING)" A component is a parameter as defined by \s-1RFC2045,\s0 optionally using encoding or continuations as defined by \s-1RFC2231. \s0 Components of an attribute are found when a field is being parsed. The RFCs are very strict on valid characters, but we cannot be: you have to accept what is coming in if you can. .Sp example: .Sp .Vb 2 \& my $param = Mail::Message::Field::Attribute\->new; \& $param\->addComponent("filename*=iso10646\*(Aqnl\-BE\*(Aq%Re\e47u"); .Ve .ie n .IP "$obj\->\fBcharset\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBcharset\fR()" 4 .IX Item "$obj->charset()" Returns the character set which is used for this parameter. If any component is added which contains character set information, this is directly available. Be warned that a character-set is case insensitive. .ie n .IP "$obj\->\fBlanguage\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBlanguage\fR()" 4 .IX Item "$obj->language()" Returns the language which is defined in the argument. If no language is defined \f(CW\*(C`undef\*(C'\fR is returned, which should be interpreted as \*(L"\s-1ANY\*(R"\s0 .ie n .IP "$obj\->\fBname\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBname\fR()" 4 .IX Item "$obj->name()" Returns the name of this attribute. .ie n .IP "$obj\->\fBstring\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBstring\fR()" 4 .IX Item "$obj->string()" Returns the parameter as reference to an array of lines. When only one line is returned, it may be short enough to fit on the same line with other components of the header field. .ie n .IP "$obj\->\fBvalue\fR( [\s-1STRING\s0] )" 4 .el .IP "\f(CW$obj\fR\->\fBvalue\fR( [\s-1STRING\s0] )" 4 .IX Item "$obj->value( [STRING] )" Returns the value of this parameter, optionally after setting it first. .SS "Attribute encoding" .IX Subsection "Attribute encoding" .ie n .IP "$obj\->\fBdecode\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBdecode\fR()" 4 .IX Item "$obj->decode()" Translate all known continuations into a value. The produced value is returned and may be utf\-8 encoded or a plain string. .ie n .IP "$obj\->\fBencode\fR()" 4 .el .IP "\f(CW$obj\fR\->\fBencode\fR()" 4 .IX Item "$obj->encode()" .SS "Internals" .IX Subsection "Internals" .PD 0 .ie n .IP "$obj\->\fBmergeComponent\fR($attribute)" 4 .el .IP "\f(CW$obj\fR\->\fBmergeComponent\fR($attribute)" 4 .IX Item "$obj->mergeComponent($attribute)" .PD Merge the components from the specified attribute into this attribute. This is needed when components of the same attribute are created separately. Merging is required by the field parsing. .SH "DIAGNOSTICS" .IX Header "DIAGNOSTICS" .IP "Warning: Illegal character in parameter name '$name'" 4 .IX Item "Warning: Illegal character in parameter name '$name'" The specified parameter name contains characters which are not permitted by the RFCs. You can better change the name into something which is accepted, or risk applications to corrupt or ignore the message. .ie n .IP "Error: Package $package does not implement $method." 4 .el .IP "Error: Package \f(CW$package\fR does not implement \f(CW$method\fR." 4 .IX Item "Error: Package $package does not implement $method." Fatal error: the specific package (or one of its superclasses) does not implement this method where it should. This message means that some other related classes do implement this method however the class at hand does not. Probably you should investigate this and probably inform the author of the package. .IP "Error: Too late to merge: value already changed." 4 .IX Item "Error: Too late to merge: value already changed." .SH "SEE ALSO" .IX Header "SEE ALSO" This module is part of Mail-Box distribution version 2.117, built on August 24, 2014. Website: \fIhttp://perl.overmeer.net/mailbox/\fR .SH "LICENSE" .IX Header "LICENSE" Copyrights 2001\-2014 by [Mark Overmeer]. For other contributors see ChangeLog. .PP This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See \fIhttp://www.perl.com/perl/misc/Artistic.html\fR