NAME
Mail::Message::Field::Structured - one line of a structured message header
INHERITANCE
Mail::Message::Field::Structured
is a Mail::Message::Field::Full
is a Mail::Message::Field
is a Mail::Reporter
Mail::Message::Field::Structured is extended by
Mail::Message::Field::Addresses
Mail::Message::Field::Date
Mail::Message::Field::URIs
SYNOPSIS
my $f = Mail::Message::Field::Full
->new('Content-Type' => 'text/html');
my @encode = (charset => 'jp', use_continuations => 1);
$f->attribute('filename=passwd');
$f->attribute(filename => 'passwd', @encode);
my $attr = Mail::Message::Field::Attribute->new(...);
$f->attribute($attr);
OVERLOADED
- overload: ""()
- overload: 0+()
- overload: <=>()
- overload: bool()
- overload: cmp()
- overload: stringification()
METHODS
Constructors
- $obj->clone()
- Mail::Message::Field::Structured->from(FIELD, OPTIONS)
- Mail::Message::Field::Structured->new(DATA)
-
new LINE
Pass a LINE as it could be found in a file: a (possibly folded) line which is terminated by a new-line.
new NAME, BODY, OPTIONS
A set of values which shape the line.
The NAME is a wellformed header name (you may use wellformedName()) to be sure about the casing. The BODY is a string, one object, or an ref-array of objects. In case of objects, they must fit to the constructor of the field: the types which are accepted may differ. The optional ATTRIBUTE list contains Mail::Message::Field::Attribute objects. Finally, there are some OPTIONS.
-Option --Defined in --Default attributes [] charset Mail::Message::Field::Full undef datum undef encoding Mail::Message::Field::Full 'q' force Mail::Message::Field::Full false language Mail::Message::Field::Full undef log Mail::Reporter 'WARNINGS' trace Mail::Reporter 'WARNINGS'
- attributes => ATTRS
-
There are various ways to specify these attributes: pass a reference to an array which list of key-value pairs representing attributes, or reference to a hash containing these pairs, or an array with Mail::Message::Field::Attribute objects.
- charset => STRING
- datum => STRING
-
The method name body is very confusing, even in the RFC. In MailBox, for historical reasons, body() returns the part of the field contents before the first semi-colon. foldedBody() and unfoldedBody() address the whole field.
There is no common name for the piece of data before the parameters (attributes) in the field-content mentioned in the RFCs, so let's call it datum.
- encoding => 'q'|'Q'|'b'|'B'
- force => BOOLEAN
- language => STRING
- log => LEVEL
- trace => LEVEL
example: of a structured field
my @attrs = (Mail::Message::Field::Attribute->new(...), ...); my @options = (extra => 'the color blue'); my $t = Mail::Message::Field::Full->new(To => \@addrs, @attrs, @options);
The field
- $obj->isStructured()
- Mail::Message::Field::Structured->isStructured()
- $obj->length()
- $obj->nrLines()
- $obj->print([FILEHANDLE])
- $obj->size()
- $obj->string([WRAP])
- $obj->toDisclose()
Access to the name
Access to the body
- $obj->body()
- $obj->decodedBody(OPTIONS)
- $obj->folded()
- $obj->foldedBody([BODY])
- $obj->stripCFWS([STRING])
- Mail::Message::Field::Structured->stripCFWS([STRING])
- $obj->unfoldedBody([BODY, [WRAP]])
Access to the content
- $obj->addresses()
- $obj->attrPairs()
-
Returns a list with attribute name and value pairs.
- $obj->attribute(OBJECT|(STRING, OPTIONS)|(NAME,VALUE,OPTIONS))
-
Add an attribute to the field. The attributes are added left-to-right into the string representation of the field, although the order of the attributes is un-important, according to the RFCs.
You may pass a fully prepared Mail::Message::Field::Attribute OBJECT, if you like to do all preparations for correct representation of the data yourself. You may also pass one STRING, which is a fully prepared attribute. This STRING will not be changed, so be careful about quoting and encodings.
As third possibility, you can specify an attribute NAME and its VALUE. An attribute object will be created for you implicitly in both cases where such object is not supplied, passing the OPTIONS. See Mail::Message::Field::Attribute::new() about the available OPTIONS.
The attribute object is returned, however, when continuations are used this may be an object you already know about.
undef
is returned when construction fails (when the attribute is incorrect).example:
$f->attribute(filename => 'passwd'); $f->attribute(filename => 'passwd', use_continuations => 0); my $attr = Mail::Message::Field::Attribute->new(...); $f->attribute($attr);
- $obj->attributes()
-
Returns a list with all attributes, which are all Mail::Message::Field::Attribute objects. The attributes are not ordered in any way. The list may be empty. Double attributes or continuations are folded into one.
- $obj->beautify()
- $obj->comment([STRING])
- $obj->createComment(STRING, OPTIONS)
- Mail::Message::Field::Structured->createComment(STRING, OPTIONS)
- $obj->createPhrase(STRING, OPTIONS)
- Mail::Message::Field::Structured->createPhrase(STRING, OPTIONS)
- $obj->study()
- $obj->toDate([TIME])
- Mail::Message::Field::Structured->toDate([TIME])
- $obj->toInt()
Other methods
Internals
- $obj->consume(LINE | (NAME,BODY|OBJECTS))
- $obj->decode(STRING, OPTIONS)
- Mail::Message::Field::Structured->decode(STRING, OPTIONS)
- $obj->defaultWrapLength([LENGTH])
- $obj->encode(STRING, OPTIONS)
- $obj->fold(NAME, BODY, [MAXCHARS])
- Mail::Message::Field::Structured->fold(NAME, BODY, [MAXCHARS])
- $obj->setWrapLength([LENGTH])
- $obj->stringifyData(STRING|ARRAY|OBJECTS)
- $obj->unfold(STRING)
Parsing
- $obj->consumeComment(STRING)
- Mail::Message::Field::Structured->consumeComment(STRING)
- $obj->consumeDotAtom(STRING)
- $obj->consumePhrase(STRING)
- Mail::Message::Field::Structured->consumePhrase(STRING)
- $obj->datum([VALUE])
-
The part of the field before the semi-colon (
;
). - $obj->parse(STRING)
- $obj->produceBody()
Error handling
- $obj->AUTOLOAD()
- $obj->addReport(OBJECT)
- $obj->defaultTrace([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK])
- Mail::Message::Field::Structured->defaultTrace([LEVEL]|[LOGLEVEL, TRACELEVEL]|[LEVEL, CALLBACK])
- $obj->errors()
- $obj->log([LEVEL [,STRINGS]])
- Mail::Message::Field::Structured->log([LEVEL [,STRINGS]])
- $obj->logPriority(LEVEL)
- Mail::Message::Field::Structured->logPriority(LEVEL)
- $obj->logSettings()
- $obj->notImplemented()
- $obj->report([LEVEL])
- $obj->reportAll([LEVEL])
- $obj->trace([LEVEL])
- $obj->warnings()
Cleanup
DIAGNOSTICS
- Warning: Field content is not numerical: $content
-
The numeric value of a field is requested (for instance the
Lines
orContent-Length
fields should be numerical), however the data contains weird characters. - Warning: Illegal character in charset '$charset'
-
The field is created with an utf8 string which only contains data from the specified character set. However, that character set can never be a valid name because it contains characters which are not permitted.
- Warning: Illegal character in field name $name
-
A new field is being created which does contain characters not permitted by the RFCs. Using this field in messages may break other e-mail clients or transfer agents, and therefore mutulate or extinguish your message.
- Warning: Illegal character in language '$lang'
-
The field is created with data which is specified to be in a certain language, however, the name of the language cannot be valid: it contains characters which are not permitted by the RFCs.
- Warning: Illegal encoding '$encoding', used 'q'
-
The RFCs only permit base64 (
b
orB
) or quoted-printable (q
orQ
) encoding. Other than these four options are illegal. - 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.
SEE ALSO
This module is part of Mail-Box distribution version 2.107, built on November 28, 2012. Website: http://perl.overmeer.net/mailbox/
LICENSE
Copyrights 2001-2012 by [Mark Overmeer]. For other contributors see ChangeLog.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See http://www.perl.com/perl/misc/Artistic.html